From 40976581a3b6ae2b10e3d0e46ccc23ac1b9fa734 Mon Sep 17 00:00:00 2001 From: Vitor Santos Costa Date: Wed, 27 Jul 2011 16:30:29 +0100 Subject: [PATCH] fix exists. --- pl/yio.yap | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/pl/yio.yap b/pl/yio.yap index b594f0267..904a8f13e 100644 --- a/pl/yio.yap +++ b/pl/yio.yap @@ -94,7 +94,8 @@ fileerrors :- '$swi_set_prolog_flag'(fileerrors, true). nofileerrors :- '$swi_set_prolog_flag'(fileerrors, false). -exists(F) :- access_file(F,exist). +exists(F) :- + absolute_file_name(F, _, [file_errors(fail),access(exist),expand(true)]). /* Term IO */