From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 29 Aug 2003 13:25:18 +0000 (+0000)
Subject: Comparing an int to a U32 makes VC6 nervous.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=77bec9fddc602cc32f38ac3764e937132ca61b3c;p=p5sagit%2Fp5-mst-13.2.git

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
--- 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
--- 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;
     }