diff options
author | David Mitchell <davem@iabyn.com> | 2015-12-30 11:46:22 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-02-03 09:19:19 +0000 |
commit | ed8ff0f310e9159df865ecc2e1d316816e8cc11e (patch) | |
tree | d33dd28d8a6105f5eb425782a96960c4ad14bfc6 /pp_sort.c | |
parent | 56e049cab541dc6047fb5dc83d9073b2034de541 (diff) | |
download | perl-ed8ff0f310e9159df865ecc2e1d316816e8cc11e.tar.gz |
convert CX_PUSH/POP/TOPBLOCK to inline fns
Replace CX_PUSHBLOCK() with cx_pushblock() etc.
No functional changes.
Diffstat (limited to 'pp_sort.c')
-rw-r--r-- | pp_sort.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1668,7 +1668,7 @@ PP(pp_sort) } gimme = G_SCALAR; - CX_PUSHBLOCK(cx, CXt_NULL, gimme, PL_stack_base, old_savestack_ix); + cx = cx_pushblock(CXt_NULL, gimme, PL_stack_base, old_savestack_ix); if (!(flags & OPf_SPECIAL)) { cx->cx_type = CXt_SUB|CXp_MULTICALL; CX_PUSHSUB(cx, cv, NULL, hasargs); @@ -1709,7 +1709,7 @@ PP(pp_sort) assert(CxTYPE(cx) == CXt_NULL); /* there isn't a POPNULL ! */ - CX_POPBLOCK(cx); + cx_popblock(cx); CX_POP(cx); POPSTACK; CATCH_SET(oldcatch); |