ast-slice

Vocabulary

infix.ast

Definition

IN: infix.ast

TUPLE: ast-slice name from to step ;

Methods

USING: accessors combinators infix.ast infix.private kernel ;

M: ast-slice infix-codegen
    {
        [
            from>>
            [ infix-codegen prepare-operand ] [ [ f ] ] if*
        ]
        [ to>> [ infix-codegen prepare-operand ] [ [ f ] ] if* ]
        [
            step>>
            [ infix-codegen prepare-operand ] [ [ f ] ] if*
        ]
        [ name>> >local-word ]
    } cleave [ [ compose ] dip compose ] dip
    [ infix-subseq ] curry compose ;