1 files changed, 2 insertions, 1 deletions
diff --git a/pp_hot.c b/pp_hot.c
index b891d79519..40b850780c 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -4330,7 +4330,8 @@ PP(pp_entersub)
                 AvARRAY(av) = ary;
             }
 
-	    Copy(MARK+1,AvARRAY(av),items,SV*);
+            if (items)
+                Copy(MARK+1,AvARRAY(av),items,SV*);
 	    AvFILLp(av) = items - 1;
 	}
 	if (UNLIKELY((cx->blk_u16 & OPpENTERSUB_LVAL_MASK) == OPpLVAL_INTRO &&