fix stack effect

diff --git a/contrib/alien.factor b/contrib/alien.factor
index f6fed758ecc80806d72a83573ab1a01f92665a94..240f5d78316df9005ee2e92fc437f2a4ee51525d 100644 (file)
--- a/contrib/alien.factor
+++ b/contrib/alien.factor
@@ -1,7 +1,7 @@
 USING: kernel alien sequences ;
 IN: alien-contrib
 
-: copy-seq-to-float-array ( seq byte-array -- )
+: copy-seq-to-float-array ( seq byte-array -- byte-array )
 swap dup length [ pick set-float-nth ] 2each ;
 
 : >float-array ( seq -- byte-array )