1 ! Copyright (C) 2008 Slava Pestov.
2 ! See http://factorcode.org/license.txt for BSD license.
3 USING: alien.c-types alien.data system kernel unix math sequences
4 io.backend.unix io.ports libc specialized-arrays accessors unix.ffi ;
9 M: unix io.pipes:(pipe) ( -- pair )
12 [ first2 [ <fd> init-fd ] bi@ io.pipes:pipe boa ] bi ;