Comparing an int to a U32 makes VC6 nervous.

p4raw-id: //depot/perl@20933

diff --git a/pp.c b/pp.c
index 2958fba..22405bf 100644 (file)
--- a/pp.c
+++ b/pp.c
@@ -4475,7 +4475,7 @@ PP(pp_split)
                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;
     }

diff --git a/pp_hot.c b/pp_hot.c
index 765f091..c70b227 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1234,7 +1234,7 @@ PP(pp_match)
     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 @@ PP(pp_subst)
               ? 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;
     }