last-literal ( #call -- obj )

Vocabulary

compiler.tree.propagation.info

Inputs

#call

an object

Outputs

obj

an object

Definition

USING: accessors kernel sequences ;

IN: compiler.tree.propagation.info

: last-literal ( #call -- obj )
    dup out-d>> last node-value-info literal>> ;