diff options
author | David Mitchell <davem@iabyn.com> | 2016-11-24 09:40:44 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-11-24 13:42:22 +0000 |
commit | e03e82a04dda6a44b815f3367c69afb0e953dc91 (patch) | |
tree | 0af20bb6d6d86cda9bedc1c62ebcacde194e382a /pp.c | |
parent | d24e3eb1402c1294265f99342e2ec0ecfd0f5d34 (diff) | |
download | perl-e03e82a04dda6a44b815f3367c69afb0e953dc91.tar.gz |
add sv_set_undef() API function
This function is equivalent to sv_setsv(sv, &PL_sv_undef), but more
efficient.
Also change the obvious places in the core to use the new idiom.
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -3249,7 +3249,7 @@ PP(pp_length) } } else { if (!SvPADTMP(TARG)) { - sv_setsv_nomg(TARG, &PL_sv_undef); + sv_set_undef(TARG); } else { /* TARG is on stack at this point and is overwriten by SETs. This branch is the odd one out, so put TARG by default on stack earlier to let local SP go out of liveness sooner */ |