]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/shuffle/shuffle.factor
factor: Rename MACRO: and MACRO: to have quot as the output in stack effects.
[factor.git] / basis / shuffle / shuffle.factor
index 0bab3c7a1bbc114b7e6c6d6a8de6fd3841d16035..03d3caed8be1f3233392bcd69eeb2e976330d088 100644 (file)
@@ -5,7 +5,7 @@ generalizations kernel macros make sequences
 sequences.generalizations ;
 IN: shuffle
 
-MACRO: shuffle-effect ( effect -- )
+MACRO: shuffle-effect ( effect -- quot )
     [ in>> H{ } zip-index-as ] [ out>> ] bi
     [ drop assoc-size '[ _ narray ] ]
     [ [ of '[ _ swap nth ] ] with map ] 2bi