Skip to content

Commit

Permalink
pp_return: reindent
Browse files Browse the repository at this point in the history
Re-indent a code block that got stranded after the previous commit.
Whitespace-only change.
  • Loading branch information
iabyn committed Jun 19, 2015
1 parent 617a4f4 commit a375cec
Showing 1 changed file with 22 additions and 22 deletions.
44 changes: 22 additions & 22 deletions pp_ctl.c
Expand Up @@ -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)) {
Expand Down

0 comments on commit a375cec

Please sign in to comment.