glob should not return error on miss

This commit is contained in:
Vítor Santos Costa 2016-01-20 22:38:42 +00:00
parent 10a29998a3
commit e8f87d2875

View File

@ -818,10 +818,7 @@ do_expand_file_name(Term t1, Term opts USES_REGS)
case GLOB_NOMATCH: case GLOB_NOMATCH:
globfree(&gresult); globfree(&gresult);
{ {
Term t; return TermNil;
char *out = LOCAL_FileNameBuf;
t = MkAtomTerm( Yap_LookupAtom( expandVars(spec, out, YAP_FILENAME_MAX-1) ));
return MkPairTerm( t, TermNil );
} }
case GLOB_ABORTED: case GLOB_ABORTED:
PlIOError(SYSTEM_ERROR_OPERATING_SYSTEM, ARG1, "glob aborted: %sn", strerror(errno)); PlIOError(SYSTEM_ERROR_OPERATING_SYSTEM, ARG1, "glob aborted: %sn", strerror(errno));
@ -861,7 +858,7 @@ do_expand_file_name(Term t1, Term opts USES_REGS)
wordfree (&wresult); wordfree (&wresult);
return TermNil; return TermNil;
default: /* Some other error. */ default: /* Some other error. */
; PlIOError(SYSTEM_ERROR_OPERATING_SYSTEM, ARG1, "wordexp failed: %s", strerror(errno)); PlIOError(SYSTEM_ERROR_OPERATING_SYSTEM, ARG1, "wordexp failed: %s", strerror(errno));
wordfree (&wresult); wordfree (&wresult);
return TermNil; return TermNil;
} }