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 alien.data system kernel unix math sequences
io.backend.unix io.ports libc specialized-arrays accessors unix.ffi ;
QUALIFIED: io.pipes
SPECIALIZED-ARRAY: int
IN: io.pipes.unix

M: unix io.pipes::(pipe) ( -- pair )
    2 int <c-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.`
specialized-arrays: performed some cleanup. Specifically, • Created >c-array to be replacement for >T-array. • Created cast-array to be generic replacement for all T-array-cast words. • Created c-array@ to be generic replacement for T-array@ words. • Replaced usages of <T-array> with T <c-array> • Replaced usages of <direct-T-array> with T <c-direct-array> • Replaced usages of >T-array with T >c-array • Replaced usages of T-array-cast with T cast-array • Replaced usages of malloc-T-array with T malloc-array. • Removed malloc-T-array. • Removed T-array-cast. • Removed T-array@. • Removed >T-array. I also added (but didn't change any code to use): • T c-array-type, returns T-array • T c-array?, returns T-array? • c-array{ T ... }, returns T-array{ ... } Bootstraps just find on Mac OS X. Also `load-all test-all` works for me. 2011-09-25 14:49:27 -04:00			`USING: alien.c-types alien.data system kernel unix math sequences`
libc: several vocabs now need to depend on libc 2013-10-21 16:58:33 -04:00			`io.backend.unix io.ports libc 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
factor: vocab:word -> vocab::word 2017-12-29 02:31:02 -05:00			`M: unix io.pipes::(pipe) ( -- pair )`
specialized-arrays: performed some cleanup. Specifically, • Created >c-array to be replacement for >T-array. • Created cast-array to be generic replacement for all T-array-cast words. • Created c-array@ to be generic replacement for T-array@ words. • Replaced usages of <T-array> with T <c-array> • Replaced usages of <direct-T-array> with T <c-direct-array> • Replaced usages of >T-array with T >c-array • Replaced usages of T-array-cast with T cast-array • Replaced usages of malloc-T-array with T malloc-array. • Removed malloc-T-array. • Removed T-array-cast. • Removed T-array@. • Removed >T-array. I also added (but didn't change any code to use): • T c-array-type, returns T-array • T c-array?, returns T-array? • c-array{ T ... }, returns T-array{ ... } Bootstraps just find on Mac OS X. Also `load-all test-all` works for me. 2011-09-25 14:49:27 -04:00			`2 int <c-array>`
Removing now-redundant underlying>> calls 2009-02-06 05:37:28 -05:00			`[ pipe io-error ]`
factor: vocab:word -> vocab::word 2017-12-29 02:31:02 -05:00			`[ first2 [ <fd> init-fd ] bi@ io.pipes::pipe boa ] bi ;`