Handle empty list in Perl_vms_do_aexec.

Since 2fcab33080e this is now expected and tested for, so do
what other platforms do.

1 files changed, 1 insertions, 0 deletions

diff --git a/vms/vms.c b/vms/vms.c
index d2d9308290..83e38f1956 100644
--- a/vms/vms.c
+++ b/vms/vms.c
@@ -10954,6 +10954,7 @@ Perl_vms_do_aexec(pTHX_ SV *really,SV **mark,SV **sp)
     return exec_sts;
   }
 
+  SETERRNO(ENOENT, RMS_FNF);
   return FALSE;
 }  /* end of vms_do_aexec() */
 /*}}}*/