basis/extra: using cleave>array in a few places

[factor.git] / basis / slots / syntax / syntax.factor

diff --git a/basis/slots/syntax/syntax.factor b/basis/slots/syntax/syntax.factor
index a17bee4c1931250784fadc7e5a278c904be2be3a..dff8b7db23441f3585b0f53b7b67a71003bfb9e4 100644 (file)
--- a/basis/slots/syntax/syntax.factor
+++ b/basis/slots/syntax/syntax.factor
@@ -10,7 +10,7 @@ SYNTAX: slots[
 
 SYNTAX: slots{
     "}" [ reader-word 1quotation ] map-tokens
-    '[ [ _ cleave ] output>array ] append! ;
+    '[ _ cleave>array ] append! ;
 
 : >>writer-word ( name -- word )
     ">>" prepend "accessors" lookup-word ;