move CX_LEAVE_SCOPE outside the POPFOO's

Currently every POPFOO macro has CX_LEAVE_SCOPE(cx) as its first action.
Since this is common code and not specific to a particular POPFOO type,
remove it from each POPFOO macro and make each caller of POPFOO explicitly
call CX_LEAVE_SCOPE() instead.

This should make no functional difference (but will help if you're
single-stepping the code in a debugger :-)

1 files changed, 1 insertions, 0 deletions

diff --git a/pp_sys.c b/pp_sys.c
index 6c978eb257..be4dec4f6a 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1523,6 +1523,7 @@ PP(pp_leavewrite)
     cx = &cxstack[cxstack_ix];
     assert(CxTYPE(cx) == CXt_FORMAT);
     SP = PL_stack_base + cx->blk_oldsp; /* ignore retval of formline */
+    CX_LEAVE_SCOPE(cx);
     POPFORMAT(cx);
     POPBLOCK(cx);
     retop = cx->blk_sub.retop;