pp_ctl - guard PL_unitcheckav setup logic from cases where the array is empty

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_ctl.c b/pp_ctl.c
index fb09d4f6c5..169b3ac6d5 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -3750,7 +3750,7 @@ S_doeval_compile(pTHX_ U8 gimme, CV* outside, U32 seq, HV *hh)
         }
     }
 
-    if (PL_unitcheckav) {
+    if (PL_unitcheckav && av_count(PL_unitcheckav)>0) {
         OP *es = PL_eval_start;
         if (in_require) {
             call_list(PL_scopestack_ix, PL_unitcheckav);