Change 27564 by [EMAIL PROTECTED] on 2006/03/21 22:09:51

        (Hopefully) make VMS happy.

Affected files ...

... //depot/perl/sv.c#1195 edit

Differences ...

==== //depot/perl/sv.c#1195 (text) ====
Index: perl/sv.c
--- perl/sv.c#1194~27559~       2006-03-20 11:30:48.000000000 -0800
+++ perl/sv.c   2006-03-21 14:09:51.000000000 -0800
@@ -5600,7 +5600,7 @@
     assert(cache);
 
     if (PL_utf8cache < 0) {
-       const char *start = SvPVX_const(sv);
+       const U8 *start = (const U8 *) SvPVX_const(sv);
        const STRLEN realutf8
            = S_sv_pos_b2u_forwards(aTHX_ start, start + byte);
 
End of Patch.

Reply via email to