<#call-recursive> ( inputs outputs label -- node )

Vocabulary

compiler.tree

Inputs

inputs	an object
outputs	an object
label	an object

Outputs

node

an object

Definition

USING: accessors kernel ;

IN: compiler.tree

: <#call-recursive> ( inputs outputs label -- node )
    #call-recursive new swap >>label swap >>out-d swap >>in-d ;