summaryrefslogtreecommitdiff
path: root/pp_sort.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2015-12-26 11:39:30 +0000
committerDavid Mitchell <davem@iabyn.com>2016-02-03 09:19:18 +0000
commitfd9b7244731b18bb1794c4ff6540e4040e51879b (patch)
treecafd34f6763a5bbb13041545bfaa905b62363fc8 /pp_sort.c
parent47878d9caf766872f9956edf713aa65c5b6383aa (diff)
downloadperl-fd9b7244731b18bb1794c4ff6540e4040e51879b.tar.gz
PUSHBLOCK: don't use implicit args
Make gimme a parameter of PUSHBLOCK() rather than just assuming that there's a 'gimme' var in scope.
Diffstat (limited to 'pp_sort.c')
-rw-r--r--pp_sort.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_sort.c b/pp_sort.c
index 65609da5fe..e910662794 100644
--- a/pp_sort.c
+++ b/pp_sort.c
@@ -1668,7 +1668,7 @@ PP(pp_sort)
}
gimme = G_SCALAR;
- PUSHBLOCK(cx, CXt_NULL, PL_stack_base, old_savestack_ix);
+ PUSHBLOCK(cx, CXt_NULL, gimme, PL_stack_base, old_savestack_ix);
if (!(flags & OPf_SPECIAL)) {
cx->cx_type = CXt_SUB|CXp_MULTICALL;
PUSHSUB(cx);