diff options
author | Vincent Pit <vince@profvince.com> | 2011-08-02 12:17:47 +0200 |
---|---|---|
committer | Vincent Pit <vince@profvince.com> | 2011-08-02 12:17:47 +0200 |
commit | 9bfbb6810ea8d096601214bae98434cdc8d85ff8 (patch) | |
tree | 54050cb32d5597af2cc3f80c20c4d1ebe272f76e /scope.c | |
parent | 83b32788f4e2799bb5cea7654fbc616d32f09598 (diff) | |
download | perl-9bfbb6810ea8d096601214bae98434cdc8d85ff8.tar.gz |
SvREFCNT_dec already checks if the SV is non-NULL
Diffstat (limited to 'scope.c')
-rw-r--r-- | scope.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -740,8 +740,7 @@ Perl_leave_scope(pTHX_ I32 base) SvSETMAGIC(value); PL_localizing = 0; SvREFCNT_dec(value); - if (av) /* actually an av, hv or gv */ - SvREFCNT_dec(av); + SvREFCNT_dec(av); /* av may actually be an AV, HV or GV */ break; case SAVEt_GENERIC_PVREF: /* generic pv */ ptr = SSPOPPTR; |