Change 14494: EBCDIC fix: t/op/lc.t failures 24-25, 29-30, 34-35, 39-40

[Jarkko Hietaniemi]

Change 14494 by jhi@alpha on 2002/01/30 00:41:52

        EBCDIC fix: t/op/lc.t failures 24-25, 29-30, 34-35, 39-40

Affected files ...

.... //depot/perl/utf8.c#155 edit

Differences ...

==== //depot/perl/utf8.c#155 (text) ====
Index: perl/utf8.c
--- perl/utf8.c.~1~     Tue Jan 29 17:45:06 2002
+++ perl/utf8.c Tue Jan 29 17:45:06 2002
@@ -1330,6 +1330,7 @@
 #endif
              return utf8_to_uvchr(ustrp, 0);
         }
+        uv  = NATIVE_TO_UNI(uv);
     }
     if (lenp)
        *lenp = UNISKIP(uv);
End of Patch.