(actually-defined-by) ( value -- )

Vocabulary

compiler.tree.def-use.simplified

Inputs

value

an object

Outputs

None

Definition

USING: compiler.tree.def-use
compiler.tree.def-use.simplified.private kernel ;

IN: compiler.tree.def-use.simplified

: (actually-defined-by) ( value -- )
    [ dup defined-by actually-defined-by* ] if-not-visited ;