Launcher fix

db4
Slava Pestov 2008-06-18 01:40:48 -05:00
parent e55c674a2b
commit 6d2ded44f2
1 changed files with 1 additions and 1 deletions

View File

@ -31,7 +31,7 @@ USE: unix
] when* ;
: redirect-fd ( oldfd fd -- )
2dup = [ 2drop ] [ dupd dup2 io-error close-file ] if ;
2dup = [ 2drop ] [ dup2 io-error ] if ;
: reset-fd ( fd -- )
#! We drop the error code because on *BSD, fcntl of