diff options
| author | David Mitchell <davem@iabyn.com> | 2015-10-21 09:41:52 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2016-02-03 09:18:31 +0000 |
| commit | 5e691bc619be723fd99b9cc9acc13d3030b412c5 (patch) | |
| tree | 1a06b37e986ed1242d6d520602070d57e6d48d96 /pp_ctl.c | |
| parent | 4ebe6e957149a0288810b6241653721d805397aa (diff) | |
| download | perl-5e691bc619be723fd99b9cc9acc13d3030b412c5.tar.gz | |
rename DEBUG_CX() to CX_DEBUG()
For consistency with the new naming convention for context-stack macros.
Also, give it a cx arg rather than using CX_CUR()
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1513,7 +1513,8 @@ Perl_dounwind(pTHX_ I32 cxix) while (cxstack_ix > cxix) { PERL_CONTEXT *cx = CX_CUR(); - DEBUG_CX("UNWIND"); + + CX_DEBUG(cx, "UNWIND"); /* Note: we don't need to restore the base context info till the end. */ CX_LEAVE_SCOPE(cx); @@ -1811,7 +1812,7 @@ PP(pp_caller) RETURN; } - DEBUG_CX("CALLER"); + CX_DEBUG(cx, "CALLER"); assert(CopSTASH(cx->blk_oldcop)); stash_hek = SvTYPE(CopSTASH(cx->blk_oldcop)) == SVt_PVHV ? HvNAME_HEK((HV*)CopSTASH(cx->blk_oldcop)) |