With Compaq C V6.2-007 on OpenVMS Alpha V7.2-1, I see the following complaint about a 
recent change to utf8.c.  The patch below makes the compiler happy, though someone 
more familiar with the UTF8 situation should verify that the cast is appropriate.


CC/DECC/NOANSI_ALIAS 
/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj/NoList/Define=PERL_CORE UTF8.C

        len = strlen(s);
..............^
%CC-W-PTRMISMATCH1, In this statement, the referenced type of the pointer value "s" is 
"unsigned char", which is not compatible with "const char" because they differ by 
signed/unsigned attribute.
at line number 170 in file D0:[CRAIG.PERL]UTF8.C;1

--- utf8.c;-0   Sat Dec 30 10:48:31 2000
+++ utf8.c      Sat Dec 30 16:38:58 2000
@@ -167,7 +167,7 @@
     STRLEN c;
 
     if (!len)
-       len = strlen(s);
+       len = strlen( (const char *) s);
     send = s + len;
 
     while (x < send) {
[end of patch]

I also see the following messages regarding sv.c, though these are of lower severity 
and do not prevent successful compilation.

CC/DECC/NOANSI_ALIAS 
/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.obj/NoList/Define=PERL_CORE SV.C

            if (cur1 < 0) {
................^
%CC-I-QUESTCOMPARE, In this statement, the unsigned expression "cur1" is being 
compared with a relational operator to a constant whose value is not greater than 
zero.  This might not be what you intended.
at line number 4666 in file D0:[CRAIG.PERL]SV.C;1

            if (cur2 < 0) {
................^
%CC-I-QUESTCOMPARE, In this statement, the unsigned expression "cur2" is being 
compared with a relational operator to a constant whose value is not greater than 
zero.  This might not be what you intended.
at line number 4674 in file D0:[CRAIG.PERL]SV.C;1

Reply via email to