diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2010-11-29 22:23:12 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2010-11-29 22:23:12 -0800 |
| commit | 10533aceddca633dc790cac997abdf25175ed2c8 (patch) | |
| tree | 36053271d3eee3e114967fb70112a6b9d0a07a94 /pp_hot.c | |
| parent | 490d91dd1a0e93241f348b009a39fe6a61fc2256 (diff) | |
| download | perl-10533aceddca633dc790cac997abdf25175ed2c8.tar.gz | |
Another oops.
Something else changed unnecessarily by 541ed3a9. I really oughtn’t do
this when I’ve been awake for more than 18 hours....
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -2898,9 +2898,7 @@ try_autoload: SAVECOMPPAD(); PAD_SET_CUR_NOSAVE(padlist, CvDEPTH(cv)); if (hasargs) { - AV *av = MUTABLE_AV(PAD_SVl(0)); - if ((SV *)av == &PL_sv_undef) - PAD_SVl(0) = (SV *)(av = newAV()); + AV *const av = MUTABLE_AV(PAD_SVl(0)); if (AvREAL(av)) { /* @_ is normally not REAL--this should only ever * happen when DB::sub() calls things that modify @_ */ |