unary-op ( word interval-quot post-proc-quot -- )

Vocabulary

compiler.tree.propagation.known-words

Inputs

word	an object
interval-quot	an object
post-proc-quot	an object

Outputs

None

Definition

USING: compiler.tree.propagation.info kernel words ;

IN: compiler.tree.propagation.known-words

: unary-op ( word interval-quot post-proc-quot -- )
    [ [ unary-op-interval ] curry ] dip
    [ [ [ [ unary-op-class ] ] ] dip [ bi ] curry compose ] dip
    [ <class/interval-info> ] compose compose
    "outputs" set-word-prop ;