From 2dcf02687e3c7fead7cd9cd807d7dd90a352074d Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa=20II?= Date: Thu, 22 Apr 2010 12:12:24 +0100 Subject: [PATCH] another victim of system module name change. --- pl/yio.yap | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/pl/yio.yap b/pl/yio.yap index 65d4069e5..e0e9e3ea1 100644 --- a/pl/yio.yap +++ b/pl/yio.yap @@ -69,7 +69,7 @@ open(F,T,S,Opts) :- '$expand_filename'(false, F, F) :- !. '$expand_filename'(true, F, NF) :- - system:true_file_name(F, NF). + operating_system_support:true_file_name(F, NF). '$open2'(Source,M,T,N,_,_) :- var(Source), !, '$do_error'(instantiation_error,open(Source,M,T,N)). @@ -1148,11 +1148,10 @@ prolog_file_name(File, PrologFileName) :- prolog_file_name(user, Out) :- !, Out = user. prolog_file_name(File, PrologFileName) :- atom(File), !, - system:true_file_name(File, PrologFileName). + operating_system_support:true_file_name(File, PrologFileName). prolog_file_name(File, PrologFileName) :- '$do_error'(type_error(atom,T), prolog_file_name(File, PrologFileName)). - with_output_to(Output, Command) :- setup_call_cleanup( '$setup_wot'(Output, Stream, OldStream, with_output_to(Output, Command)), once(Command),