build-call-graph ( nodes -- labels calls )

Vocabulary

compiler.tree.recursive.private

Inputs

nodes

an object

Outputs

labels	an object
calls	an object

Definition

USING: kernel namespaces ;

IN: compiler.tree.recursive.private

: build-call-graph ( nodes -- labels calls )
    [
        V{ } clone children set V{ } clone calls set [ t ] dip
        (build-call-graph) children get calls get
    ] with-scope ;