summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2013-10-24 12:46:52 -0700
committerFather Chrysostomos <sprout@cpan.org>2013-10-24 17:50:19 -0700
commit1a8bdda9d755b989a595e71b28eba150ebaae663 (patch)
tree51db4a809010bf9a9febe2d85eb5d428cee569c1 /pp_hot.c
parent348e937b56a12497c3c54e7a108457159955398f (diff)
downloadperl-1a8bdda9d755b989a595e71b28eba150ebaae663.tar.gz
rv2hv does not use its TARG
rv2hv has had a TARG since perl 5.000, but it has not used it since hv_scalar was added in perl-5.8.0-3008-ga3bcc51. This commit removes it, saving a tiny bit of space in the pad.
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_hot.c b/pp_hot.c
index 11553285b1..3bbc4aaabf 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -939,7 +939,7 @@ PP(pp_rv2av)
&& (!SvRMAGICAL(sv) || !mg_find(sv, PERL_MAGIC_tied)))
SETs(HvUSEDKEYS(sv) ? &PL_sv_yes : sv_2mortal(newSViv(0)));
else if (gimme == G_SCALAR) {
- dTARGET;
+ dTARG;
TARG = Perl_hv_scalar(aTHX_ MUTABLE_HV(sv));
SPAGAIN;
SETTARG;