Skip to content

Commit

Permalink
pp_leaveloop(): rename local vars
Browse files Browse the repository at this point in the history
For internal consistency and for consistency with other pp_leave()
functions, rename oldsp to base and mark/MARK to oldsp.

Should be no functional difference.
  • Loading branch information
iabyn committed Sep 27, 2016
1 parent e9fb18e commit 032736a
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions pp_ctl.c
Original file line number Diff line number Diff line change
Expand Up @@ -2248,21 +2248,21 @@ PP(pp_leaveloop)
{
PERL_CONTEXT *cx;
U8 gimme;
SV **base;
SV **oldsp;
SV **mark;

cx = CX_CUR();
assert(CxTYPE_is_LOOP(cx));
mark = PL_stack_base + cx->blk_oldsp;
oldsp = CxTYPE(cx) == CXt_LOOP_LIST
oldsp = PL_stack_base + cx->blk_oldsp;
base = CxTYPE(cx) == CXt_LOOP_LIST
? PL_stack_base + cx->blk_loop.state_u.stack.basesp
: mark;
: oldsp;
gimme = cx->blk_gimme;

if (gimme == G_VOID)
PL_stack_sp = oldsp;
PL_stack_sp = base;
else
leave_adjust_stacks(MARK, oldsp, gimme,
leave_adjust_stacks(oldsp, base, gimme,
PL_op->op_private & OPpLVALUE ? 3 : 1);

CX_LEAVE_SCOPE(cx);
Expand Down

0 comments on commit 032736a

Please sign in to comment.