basis: removing unnecessary method stack effects.

[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 92058e805f14722f4e854505f9412bc9806d34fb..f950a9d6be80ebd0968c2fa39d3e161c2dd37827 100644 (file)
--- a/basis/io/pipes/unix/unix.factor
+++ b/basis/io/pipes/unix/unix.factor
@@ -1,12 +1,11 @@
 ! 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
+USING: alien.c-types alien.data io.backend.unix io.pipes kernel
+libc sequences specialized-arrays system unix.ffi ;
 SPECIALIZED-ARRAY: int
 IN: io.pipes.unix
 
-M: unix io.pipes:(pipe) ( -- pair )
+M: unix (pipe)
     2 int <c-array>
-    [ pipe io-error ]
+    [ unix.ffi:pipe io-error ]
     [ first2 [ <fd> init-fd ] bi@ io.pipes:pipe boa ] bi ;