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.