finalize-word ( #call word -- nodes )

Vocabulary

compiler.tree.finalization

Inputs

#call	an object
word	an object

Outputs

nodes

an object

Definition

IN: compiler.tree.finalization

GENERIC: finalize-word ( #call word -- nodes )

Methods

USING: compiler.tree.finalization kernel math.partial-dispatch
words ;

M: math-partial finalize-word
    dup primitive? [ drop ] [ nip cached-expansion ] if ;


USING: accessors classes classes.builtin classes.singleton
classes.tuple combinators compiler.tree.finalization kernel
words ;

M: predicate finalize-word
    "predicating" word-prop {
        {
            [ dup builtin-class? ]
            [ drop word>> cached-expansion ]
        }
        {
            [ dup tuple-class? ]
            [ drop word>> splice-predicate ]
        }
        {
            [ dup singleton-class? ]
            [ drop word>> splice-predicate ]
        }
        [ drop ]
    } cond ;


USING: compiler.tree.finalization kernel words ;

M: word finalize-word drop ;