]> gitweb.factorcode.org Git - factor.git/commitdiff
alien-contrib fix
authorwayo.cavazos <wayo.cavazos@gmail.com>
Mon, 11 Sep 2006 10:57:10 +0000 (10:57 +0000)
committerwayo.cavazos <wayo.cavazos@gmail.com>
Mon, 11 Sep 2006 10:57:10 +0000 (10:57 +0000)
contrib/alien.factor

index ef09c4cf0003aa27a22e7a1d94a1a52a4b446101..f6fed758ecc80806d72a83573ab1a01f92665a94 100644 (file)
@@ -1,4 +1,4 @@
-
+USING: kernel alien sequences ;
 IN: alien-contrib
 
 : copy-seq-to-float-array ( seq byte-array -- )
@@ -8,3 +8,5 @@ swap dup length [ pick set-float-nth ] 2each ;
 dup length "float" <c-array> copy-seq-to-float-array ;
 
 : float-array>array ( byte-array n -- array ) [ swap float-nth ] map-with ;
+
+PROVIDE: contrib/alien ;
\ No newline at end of file