X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pp_sys.c;h=ee8605c6f5306b4af2ef2fca35ed06c2dbac9e99;hb=8c38c51e0630cc3e80c813fdaf5a7948fd156160;hp=96260252ad7b33e0c45e8b867f1eded536ca69a2;hpb=26fb8f1f48b6245e35b6b73b7e98bbb26aab4dc6;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pp_sys.c b/pp_sys.c index 9626025..ee8605c 100644 --- a/pp_sys.c +++ b/pp_sys.c @@ -356,6 +356,10 @@ PP(pp_glob) OP *result; tryAMAGICunTARGET(iter, -1); + /* Note that we only ever get here if File::Glob fails to load + * without at the same time croaking, for some reason, or if + * perl was built with PERL_EXTERNAL_GLOB */ + ENTER; #ifndef VMS