diff options
author | David Mitchell <davem@iabyn.com> | 2015-06-11 11:05:50 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2015-06-19 08:44:18 +0100 |
commit | a375ceca5d834c83946967bb2d7972d7403acedb (patch) | |
tree | 221f879396f1fc5b231d127f19feabaef84c56bc | |
parent | 617a4f41d97982726e3623f6bc82502ee14d2403 (diff) | |
download | perl-a375ceca5d834c83946967bb2d7972d7403acedb.tar.gz |
pp_return: reindent
Re-indent a code block that got stranded after the previous commit.
Whitespace-only change.
-rw-r--r-- | pp_ctl.c | 44 |
1 files changed, 22 insertions, 22 deletions
@@ -2442,30 +2442,30 @@ PP(pp_return) cx = &cxstack[cxix]; - oldsp = PL_stack_base + cx->blk_oldsp; - if (oldsp != MARK) { - /* Handle extra junk on the stack. For example, - * for (1,2) { return 3,4 } - * leaves 1,2,3,4 on the stack. In list context we - * have to splice out the 1,2; In scalar context for - * for (1,2) { return } - * we need to set sp = oldsp so that pp_leavesub knows - * to push &PL_sv_undef onto the stack. - * Note that in pp_return we only do the extra processing - * required to handle junk; everything else we leave to - * pp_leavesub. - */ - SSize_t nargs = SP - MARK; - if (nargs) { - if (cx->blk_gimme == G_ARRAY) { - /* shift return args to base of call stack frame */ - Move(MARK + 1, oldsp + 1, nargs, SV**); - PL_stack_sp = oldsp + nargs; - } + oldsp = PL_stack_base + cx->blk_oldsp; + if (oldsp != MARK) { + /* Handle extra junk on the stack. For example, + * for (1,2) { return 3,4 } + * leaves 1,2,3,4 on the stack. In list context we + * have to splice out the 1,2; In scalar context for + * for (1,2) { return } + * we need to set sp = oldsp so that pp_leavesub knows + * to push &PL_sv_undef onto the stack. + * Note that in pp_return we only do the extra processing + * required to handle junk; everything else we leave to + * pp_leavesub. + */ + SSize_t nargs = SP - MARK; + if (nargs) { + if (cx->blk_gimme == G_ARRAY) { + /* shift return args to base of call stack frame */ + Move(MARK + 1, oldsp + 1, nargs, SV**); + PL_stack_sp = oldsp + nargs; } - else - PL_stack_sp = oldsp; } + else + PL_stack_sp = oldsp; + } /* fall through to a normal exit */ switch (CxTYPE(cx)) { |