factor/basis/io/pipes/unix/unix.factor

! Copyright (C) 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: alien.c-types system kernel unix math sequences
io.backend.unix io.ports specialized-arrays accessors unix.ffi ;
QUALIFIED: io.pipes
SPECIALIZED-ARRAY: int
IN: io.pipes.unix

M: unix io.pipes:(pipe) ( -- pair )
    2 <int-array>
    [ pipe io-error ]
    [ first2 [ <fd> init-fd ] bi@ io.pipes:pipe boa ] bi ;
Split stdio up into input-stream/output-stream, pipes work in progress 2008-05-05 03:19:25 -04:00			`! Copyright (C) 2008 Slava Pestov.`
			`! See http://factorcode.org/license.txt for BSD license.`
add USING:s and rearrange definitions so macosx can compile without parsing c-type strings 2009-09-27 00:14:57 -04:00			`USING: alien.c-types system kernel unix math sequences`
Handle EINTR in a lot of cases where it wasn't handled before. Split off unix into unix.ffi and unix. 2010-01-20 23:42:07 -05:00			`io.backend.unix io.ports specialized-arrays accessors unix.ffi ;`
Split stdio up into input-stream/output-stream, pipes work in progress 2008-05-05 03:19:25 -04:00			`QUALIFIED: io.pipes`
Specialized array overhaul - Replace hand-written specialized-arrays.* subvocabularies with new system; instead of USE:ing specialized-arrays.T, do SPECIALIZED-ARRAY: T - Ditto for specialized-vectors; use SPECIALIZED-VECTOR: - io.mmap.functor: removed entirely, use <mapped-array> instead - struct-arrays and struct-vectors have been removed because specialized arrays and vectors subsume them entirely 2009-09-09 23:33:34 -04:00			`SPECIALIZED-ARRAY: int`
			`IN: io.pipes.unix`
Split stdio up into input-stream/output-stream, pipes work in progress 2008-05-05 03:19:25 -04:00
			`M: unix io.pipes:(pipe) ( -- pair )`
Specialized arrays work in progress 2008-11-14 21:18:16 -05:00			`2 <int-array>`
Removing now-redundant underlying>> calls 2009-02-06 05:37:28 -05:00			`[ pipe io-error ]`
Fixing bootstrap with specialized arrays 2008-12-02 03:44:19 -05:00			`[ first2 [ <fd> init-fd ] bi@ io.pipes:pipe boa ] bi ;`