summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2011-02-06 21:09:57 +0000
committerDavid Mitchell <davem@iabyn.com>2011-02-06 21:34:44 +0000
commitdd3f15c9a7d31e534b80c388d709c3722131d71e (patch)
treedb6942bf3629da2e26967c0e5139d814f3020bf9 /pp_hot.c
parentc95ca9b8cd1e9cb94201b96527b666a2e68bd781 (diff)
downloadperl-dd3f15c9a7d31e534b80c388d709c3722131d71e.tar.gz
pp_subst: do SvUTF8_on next to the SvPOK_only_UTF8
This should leave things functionally unchanged. This is another step in making two branches of code more identical
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 7316c5aabb..941dd04d6f 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2320,11 +2320,11 @@ PP(pp_subst)
mPUSHi((I32)iters);
}
(void)SvPOK_only_UTF8(TARG);
+ if (doutf8)
+ SvUTF8_on(TARG);
TAINT_IF(rxtainted);
SvSETMAGIC(TARG);
SvTAINT(TARG);
- if (doutf8)
- SvUTF8_on(TARG);
LEAVE_SCOPE(oldsave);
RETURN;
}