Change 20933 by [EMAIL PROTECTED] on 2003/08/29 13:25:18

        Comparing an int to a U32 makes VC6 nervous.

Affected files ...

... //depot/perl/pp.c#391 edit
... //depot/perl/pp_hot.c#325 edit

Differences ...

==== //depot/perl/pp.c#391 (text) ====
Index: perl/pp.c
--- perl/pp.c#390~20462~        Sun Aug  3 15:26:10 2003
+++ perl/pp.c   Fri Aug 29 06:25:18 2003
@@ -4475,7 +4475,7 @@
                s++;
        }
     }
-    if ((pm->op_pmflags & PMf_MULTILINE) != PL_multiline) {
+    if ((bool)(pm->op_pmflags & PMf_MULTILINE) != (bool)PL_multiline) {
        SAVEINT(PL_multiline);
        PL_multiline = pm->op_pmflags & PMf_MULTILINE;
     }

==== //depot/perl/pp_hot.c#325 (text) ====
Index: perl/pp_hot.c
--- perl/pp_hot.c#324~20909~    Tue Aug 26 12:13:39 2003
+++ perl/pp_hot.c       Fri Aug 29 06:25:18 2003
@@ -1234,7 +1234,7 @@
     if (SvSCREAM(TARG))
        r_flags |= REXEC_SCREAM;
 
-    if ((pm->op_pmflags & PMf_MULTILINE) != PL_multiline) {
+    if ((bool)(pm->op_pmflags & PMf_MULTILINE) != (bool)PL_multiline) {
        SAVEINT(PL_multiline);
        PL_multiline = pm->op_pmflags & PMf_MULTILINE;
     }
@@ -1979,7 +1979,7 @@
               ? REXEC_COPY_STR : 0;
     if (SvSCREAM(TARG))
        r_flags |= REXEC_SCREAM;
-    if ((pm->op_pmflags & PMf_MULTILINE) != PL_multiline) {
+    if ((bool)(pm->op_pmflags & PMf_MULTILINE) != (bool)PL_multiline) {
        SAVEINT(PL_multiline);
        PL_multiline = pm->op_pmflags & PMf_MULTILINE;
     }
End of Patch.

Reply via email to