<#push> ( literal value -- node )

Vocabulary

compiler.tree

Inputs

literal	an object
value	an object

Outputs

node

an object

Definition

USING: accessors arrays kernel ;

IN: compiler.tree

: <#push> ( literal value -- node )
    #push new swap 1array >>out-d swap >>literal ;