unix.utilities: move to alien.utilities

[factor.git] / basis / unix / utilities / utilities.factor

diff --git a/basis/unix/utilities/utilities.factor b/basis/unix/utilities/utilities.factor
deleted file mode 100644 (file)
index cd32c91..0000000
--- a/basis/unix/utilities/utilities.factor
+++ /dev/null
@@ -1,22 +0,0 @@
-! Copyright (C) 2008 Doug Coleman.
-! See http://factorcode.org/license.txt for BSD license.
-USING: alien alien.c-types alien.data alien.strings
-combinators.short-circuit fry kernel layouts sequences accessors
-specialized-arrays ;
-IN: unix.utilities
-
-SPECIALIZED-ARRAY: void*
-
-: more? ( alien -- ? )
-    { [ ] [ void* deref ] } 1&& ;
-
-: advance ( void* -- void* )
-    cell swap <displaced-alien> ;
-
-: alien>strings ( alien encoding -- strings )
-    [ [ dup more? ] ] dip
-    '[ [ advance ] [ void* deref _ alien>string ] bi ]
-    produce nip ;
-
-: strings>alien ( strings encoding -- array )
-    '[ _ malloc-string ] void*-array{ } map-as f suffix ;