default-output-value-infos ( #call word -- infos )


Vocabulary
compiler.tree.propagation.simple

Inputs
#callan object
wordan object


Outputs
infosan object


Definition
USING: accessors compiler.tree.propagation.info kernel sequences
words ;

IN: compiler.tree.propagation.simple

: default-output-value-infos ( #call word -- infos )
"default-output-classes" word-prop or*
[ class-infos ] [ out-d>> length object-info <repetition> ]
if ;