s_absolute_file_name/2

This commit is contained in:
Vitor Santos Costa 2011-02-12 01:23:48 +00:00
parent efc65fdb28
commit 74d780698e

View File

@ -1369,6 +1369,8 @@ file_directory_name(File, Dir) :-
swi_file_directory_name(File, Dir). swi_file_directory_name(File, Dir).
file_name_extension(File, Name, Extension) :- file_name_extension(File, Name, Extension) :-
swi_file_name_extension(File, Name, Extension). swi_file_name_extension(File, Name, Extension).
is_absolute_file_name(File) :-
swi_is_absolute_file_name(File).
prolog_to_os_filename(Prolog, OS) :- prolog_to_os_filename(Prolog, OS) :-
swi_prolog_to_os_filename(Prolog, OS). swi_prolog_to_os_filename(Prolog, OS).
time_file(File, Time) :- time_file(File, Time) :-
@ -1376,3 +1378,7 @@ time_file(File, Time) :-
working_directory(OLD, NEW) :- working_directory(OLD, NEW) :-
swi_working_directory(OLD, NEW). swi_working_directory(OLD, NEW).
cd(Dir) :- working_directory(_, NEW).
getcwd(Dir) :- working_directory(OLD, OLD).