propagate-<tuple-boa> ( #call -- infos )

Vocabulary

compiler.tree.propagation.slots

Inputs

#call

an object

Outputs

infos

an object

Definition

USING: accessors arrays compiler.tree.propagation.info sequences
;

IN: compiler.tree.propagation.slots

: propagate-<tuple-boa> ( #call -- infos )
    in-d>> unclip-last value-info literal>> first
    (propagate-<tuple-boa>) 1array ;