steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

New <file-r/w> word for opening a stream that can read and write to the same path -- only useful for *nix devices

slava 2006-07-21 20:31:39 +00:00
parent 642964757a
commit 0cfe78aeaa
2 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
library/io/unix/files.factor
View File

@ -1,7 +1,8 @@
! Copyright (C) 2005 Slava Pestov. ! Copyright (C) 2005, 2006 Slava Pestov.
! See http://factor.sf.net/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
IN: io IN: io
USE: io-internals USING: io-internals kernel ;
: <file-reader> ( path -- stream ) open-read <reader> ; : <file-reader> ( path -- stream ) open-read <reader> ;
: <file-writer> ( path -- stream ) open-write <writer> ; : <file-writer> ( path -- stream ) open-write <writer> ;
: <file-r/w> ( path -- stream ) open-r/w dup <fd-stream> ;

1
library/io/unix/io.factor
View File

@ -295,6 +295,7 @@ M: port stream-close ( stream -- )
] unless drop ; ] unless drop ;
! Make a duplex stream for reading/writing a pair of fds ! Make a duplex stream for reading/writing a pair of fds
: open-r/w ( path -- fd ) O_RDWR file-mode open dup io-error ;
: <fd-stream> ( infd outfd -- stream ) : <fd-stream> ( infd outfd -- stream )
>r <reader> r> <writer> <duplex-stream> ; >r <reader> r> <writer> <duplex-stream> ;