diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-11-06 20:36:50 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-11-06 20:36:50 +0000 |
| commit | 352edd9075ba60982b61693a9f3cdf22a5d9b2f9 (patch) | |
| tree | 79fbc7555022df6c09cc5125a3016b066faa4d5a /av.c | |
| parent | 3095d9770ef6ed78f84315fc655ef2070c7b9c04 (diff) | |
| download | perl-352edd9075ba60982b61693a9f3cdf22a5d9b2f9.tar.gz | |
fix AvREALISH bogusness
p4raw-id: //depot/perl@2210
Diffstat (limited to 'av.c')
| -rw-r--r-- | av.c | 5 |
1 files changed, 1 insertions, 4 deletions
@@ -175,10 +175,7 @@ av_fetch(register AV *av, I32 key, I32 lval) if (key > AvFILLp(av)) { if (!lval) return 0; - if (AvREALISH(av)) - sv = NEWSV(5,0); - else - sv = sv_newmortal(); + sv = NEWSV(5,0); return av_store(av,key,sv); } if (AvARRAY(av)[key] == &PL_sv_undef) { |