Nicholas Clark wrote:
Change 27557 by [EMAIL PROTECTED] on 2006/03/20 18:17:39
Abstract the string walking functionality from Perl_sv_pos_b2u into
static functions, and make it respect PL_utf8cache.
Affected files ...
... //depot/perl/sv.c#1192 edit
Differences ...
+
+static void
+S_utf8_mg_pos_cache_update(pTHX_ SV *sv, MAGIC **mgp, STRLEN byte, STRLEN utf8)
+{
+ STRLEN *cache;
+ if (SvREADONLY(sv))
+ return;
+
+ if (PL_utf8cache < 0) {
+ const char *start = SvPVX_const(sv);
+ const STRLEN realutf8
+ = S_sv_pos_b2u_forwards(aTHX_ start, start + byte);
2 69367 = S_sv_pos_b2u_forwards(aTHX_ start, start + byte);
..........................................1......2
%CC-W-PTRMISMATCH1, (1) In the initializer for realutf8, the referenced
type of the pointer value "start" is "const char", which is not
compatible with "const unsigned char" because they differ by
signed/unsigned attribute.
%CC-W-PTRMISMATCH1, (2) In the initializer for realutf8, the referenced
type of the pointer value "start+byte" is "const char", which is not
compatible with "const unsigned char" because they differ by
signed/unsigned attribute.
Breaks building Perl on OpenVMS.
-John
[EMAIL PROTECTED]
Personal Opinion Only
