diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix typos

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@287 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2002-01-10 21:42:29 +00:00
parent 77f57ba928
commit f41a702445
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
library/system.yap
View File

@@ -289,7 +289,7 @@ win_popen(0, Command, ForReading, Result) :-
exec_command(Command, 0, ForWriting, 2, _, Result),
close(ForWriting).
win_popen(1, Command, ForWriting, Result) :-
open_pipe_streams(Stream, ForWriting),
open_pipe_streams(ForReading, ForWriting),
exec_command(Command, ForReading, 1, 2, _, Result),
close(ForReading).
@@ -358,7 +358,7 @@ get_shell0(Shell) :-
getenv('SHELL', Shell), !.
get_shell0(Shell) :-
win, !,
getenv('COMSPEC', Shell0).
getenv('COMSPEC', Shell).
get_shell0('/bin/sh').
get_shell(Shell) :-