From e956e27a94f466949439d93a695bd66abfb7dbef Mon Sep 17 00:00:00 2001 From: Jarkko Hietaniemi Date: Tue, 9 Oct 2001 13:52:50 +0000 Subject: [PATCH] Seems that a glob(undef) triggers an ACCVIO in Perl_flex_stat Seems that a glob(undef) triggers an ACCVIO in Perl_flex_stat, when a NULL is passed for the filename string pointer. From Charles Lane. p4raw-id: //depot/perl@12381 --- vms/vms.c | 1 + 1 file changed, 1 insertion(+) diff --git a/vms/vms.c b/vms/vms.c index c076809778..fd02f851bd 100644 --- a/vms/vms.c +++ b/vms/vms.c @@ -6378,6 +6378,7 @@ Perl_flex_stat(pTHX_ const char *fspec, Stat_t *statbufp) char temp_fspec[NAM$C_MAXRSS+300]; int retval = -1; + if (!fspec) return retval; strcpy(temp_fspec, fspec); if (statbufp == (Stat_t *) &PL_statcache) do_tovmsspec(temp_fspec,namecache,0); -- 2.34.1