specialized-arrays: performed some cleanup.

[factor.git] / basis / io / pipes / unix / unix.factor

diff --git a/basis/io/pipes/unix/unix.factor b/basis/io/pipes/unix/unix.factor
index 7dbeb0a589253bbef155404acb4fc204a98dca5d..2ac496469721b61d63708f031681c30a55189d8c 100644 (file)
--- a/basis/io/pipes/unix/unix.factor
+++ b/basis/io/pipes/unix/unix.factor
@@ -1,12 +1,12 @@
 ! Copyright (C) 2008 Slava Pestov.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: alien.c-types system kernel unix math sequences
+USING: alien.c-types alien.data 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>
+    2 int <c-array>
     [ pipe io-error ]
     [ first2 [ <fd> init-fd ] bi@ io.pipes:pipe boa ] bi ;