summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-06-24 18:45:55 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-06-24 18:45:55 +0000
commit4b5a0d1cdb4affefef97f05409e2eedd7d644970 (patch)
tree1369264b7f8544662cb1fa30e44d6edceb6b9c4f /pp_ctl.c
parentd6ae682c3b074305be42218c870675979298d3f9 (diff)
downloadperl-4b5a0d1cdb4affefef97f05409e2eedd7d644970.tar.gz
Argh. How hard it can be to re-apply a patch manually? :-)
p4raw-id: //depot/perl@10904
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 6ba97c8a74..24dfc26da1 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -89,13 +89,12 @@ PP(pp_regcomp)
tmpstr = POPs;
- /* prevent recompiling under /o and ithreads. */
+ /* prevent recompiling under /o and ithreads. */
#if defined(USE_ITHREADS) || defined(USE_THREADS)
- if (pm->op_pmflags & PMf_KEEP && PM_GETRE(pm))
- RETURN;
+ if (pm->op_pmflags & PMf_KEEP && PM_GETRE(pm))
+ RETURN;
#endif
- tmpstr = POPs;
if (SvROK(tmpstr)) {
SV *sv = SvRV(tmpstr);
if(SvMAGICAL(sv))