arguments-codegen ( seq -- quot )

Vocabulary

infix.private

Inputs

seq

an object

Outputs

quot

an object

Definition

USING: kernel sequences ;

IN: infix.private

: arguments-codegen ( seq -- quot )
    [ [ ] ]
    [ [ infix-codegen prepare-operand ] [ compose ] map-reduce ]
    if-empty ;