spread* ( n -- quot )
Factor handbook » The language » Combinators » Generalized shuffle words and combinators » Generalized combinators

Prev:	cleave* ( n -- quot )
Next:	apply-curry ( a... quot n -- )

Vocabulary
generalizations

Inputs

n	an integer

Outputs
None

Word description
Like spread, but instead of taking a single array of quotations, spreads using quotations taken from the top n elements of the datastack.

Notes
This word can be used with apply-curry to generalize the bi-curry@ bi* or tri-curry@ tri* dataflow patterns.

Definition

USING: kernel math ranges sequences ;

IN: generalizations

MACRO: spread* ( n -- quot )
    [ [ ] ] [
        [1..b)
        [ [ ndip ] curry [ curry ] curry [ dip compose ] curry ]
        map [ ] concat-as [ call ] compose
    ] if-zero ;