From f35f5b925341c180b03b54ed83bcd1a78b767ecb Mon Sep 17 00:00:00 2001 From: vsc Date: Fri, 28 Sep 2007 22:59:11 +0000 Subject: [PATCH] absolute_file_name/2 should succeed even if file does not exist. git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1941 b08c6af1-5177-4d33-ba66-4b1c6b8b522a --- pl/consult.yap | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pl/consult.yap b/pl/consult.yap index 3f0807f34..a615dadd5 100644 --- a/pl/consult.yap +++ b/pl/consult.yap @@ -561,7 +561,7 @@ absolute_file_name(V,Out) :- var(V), !, '$do_error'(instantiation_error, absolute_file_name(V, Out)). absolute_file_name(user,user) :- !. absolute_file_name(File0,File) :- - '$absolute_file_name'(File0,[access(exist),file_type(source),file_errors(fail),solutions(first)],File,absolute_file_name(File0,File)). + '$absolute_file_name'(File0,[access(none),file_type(txt),file_errors(fail),solutions(first)],File,absolute_file_name(File0,File)). '$find_in_path'(F0,F,G) :- '$absolute_file_name'(F0,[access(read),file_type(source),file_errors(fail),solutions(first)],F,G).