diff options
author | David Mitchell <davem@iabyn.com> | 2015-10-10 23:22:30 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-02-03 08:59:41 +0000 |
commit | 88c9015732ec6efe92272206fcb71e4ffdff65c7 (patch) | |
tree | 2a669c9e198540159a226d49a452900f7bdfa2af /pp_sort.c | |
parent | 478e976c1070c5dc02cb3fc4d474b21b7cef236c (diff) | |
download | perl-88c9015732ec6efe92272206fcb71e4ffdff65c7.tar.gz |
eliminate LEAVESUB() macro
Many years ago, POPSUB was split into two parts, with a final cleanup
being done by the LEAVESUB() macro. After the previous commit, LEAVESUB
now always immediately follows POPSUB, so roll its action into the
last line of POPSUB and eliminate it.
This also allows us to remove the 'sv' parameter from POPSUB(), which
was needed purely to communicate to LEAVESUB() which var to process
Diffstat (limited to 'pp_sort.c')
-rw-r--r-- | pp_sort.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -1707,12 +1707,10 @@ PP(pp_sort) sort_flags); if (!(flags & OPf_SPECIAL)) { - SV *sv; /* Reset cx, in case the context stack has been reallocated. */ cx = &cxstack[cxstack_ix]; - POPSUB(cx, sv); - LEAVESUB(sv); + POPSUB(cx); } else /* mimic POPSUB */ |