summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2003-08-29 20:22:21 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2003-08-29 20:22:21 +0000
commite8f49695ec8338ebf4a555064783fc9db1320cdd (patch)
treef7ce97d5aae3656b47c01a1ebe31c3835a932792 /pp_hot.c
parent059a10146419a6f49976e2c5f746a49407194e27 (diff)
downloadperl-e8f49695ec8338ebf4a555064783fc9db1320cdd.tar.gz
Don't cast PL_multiline to bool : you may loose important bits.
p4raw-id: //depot/perl@20938
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/pp_hot.c b/pp_hot.c
index c70b2270b7..0851ab8d1e 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1234,7 +1234,7 @@ PP(pp_match)
if (SvSCREAM(TARG))
r_flags |= REXEC_SCREAM;
- if ((bool)(pm->op_pmflags & PMf_MULTILINE) != (bool)PL_multiline) {
+ if ((int)(pm->op_pmflags & PMf_MULTILINE) != 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 ((bool)(pm->op_pmflags & PMf_MULTILINE) != (bool)PL_multiline) {
+ if ((int)(pm->op_pmflags & PMf_MULTILINE) != PL_multiline) {
SAVEINT(PL_multiline);
PL_multiline = pm->op_pmflags & PMf_MULTILINE;
}