summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--av.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/av.c b/av.c
index fc2004ee43..2f819717a7 100644
--- a/av.c
+++ b/av.c
@@ -279,9 +279,8 @@ Perl_av_fetch(pTHX_ AV *av, SSize_t key, I32 lval)
return lval ? av_store(av,key,newSV(0)) : NULL;
}
- if (AvREIFY(av)
- && (!AvARRAY(av)[key] /* eg. @_ could have freed elts */
- || SvIS_FREED(AvARRAY(av)[key]))) {
+ if (AvREIFY(av) && SvIS_FREED(AvARRAY(av)[key])) {
+ /* eg. @_ could have freed elts */
AvARRAY(av)[key] = NULL; /* 1/2 reify */
goto emptyness;
}