summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2015-12-30 13:09:36 +0000
committerDavid Mitchell <davem@iabyn.com>2016-02-03 09:19:20 +0000
commit6a7d52ccb6c2daf79e90e6cb93bbc5f3d516509a (patch)
tree118e85f44600a59694d1bb574f4ee4d1ac028af8 /pp_sys.c
parenta73d8813ef7582a7040306de412d61e841271675 (diff)
downloadperl-6a7d52ccb6c2daf79e90e6cb93bbc5f3d516509a.tar.gz
convert CX_PUSHFORMAT/POPFORMAT to inline fns
Replace CX_PUSHFORMAT() with cx_pushformat() etc. No functional changes.
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 95c7d8b5e6..dd14baccb8 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1390,7 +1390,7 @@ S_doform(pTHX_ CV *cv, GV *gv, OP *retop)
cv = MUTABLE_CV(sv_2mortal(MUTABLE_SV(cv_clone(cv))));
cx = cx_pushblock(CXt_FORMAT, gimme, PL_stack_sp, PL_savestack_ix);
- CX_PUSHFORMAT(cx, cv, gv, retop);
+ cx_pushformat(cx, cv, retop, gv);
if (CvDEPTH(cv) >= 2)
pad_push(CvPADLIST(cv), CvDEPTH(cv));
PAD_SET_CUR_NOSAVE(CvPADLIST(cv), CvDEPTH(cv));
@@ -1525,7 +1525,7 @@ PP(pp_leavewrite)
assert(CxTYPE(cx) == CXt_FORMAT);
SP = PL_stack_base + cx->blk_oldsp; /* ignore retval of formline */
CX_LEAVE_SCOPE(cx);
- CX_POPFORMAT(cx);
+ cx_popformat(cx);
cx_popblock(cx);
retop = cx->blk_sub.retop;
CX_POP(cx);