summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2011-02-18 12:12:31 +0000
committerDavid Mitchell <davem@iabyn.com>2011-02-18 12:12:31 +0000
commit6bf8f18953312131104d1c89468e2e46e5a6cf47 (patch)
tree8ec986e92a6fb7c3fcf6d85e05c752bd136a9349 /pp_ctl.c
parent9274aefd575ecb452e8b3e33659780c198ca43ab (diff)
downloadperl-6bf8f18953312131104d1c89468e2e46e5a6cf47.tar.gz
pp_regcomp: don't unset RXf_TAINTED
Currently at the end of this function, the flag RXf_TAINTED is set or unset based the value of PL_tainting. Skip the unsetting part. At the moment this is a noop, but in some future variant, it might clear the flag that has already been set in some other way. In other words, be conservative.
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index f5a7a48f4b..44cf3c1337 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -244,8 +244,6 @@ PP(pp_regcomp)
SvTAINTED_on((SV*)re);
RX_EXTFLAGS(re) |= RXf_TAINTED;
}
- else
- RX_EXTFLAGS(re) &= ~RXf_TAINTED;
}
#endif