unbox-tuples ( nodes -- nodes )


Vocabulary
compiler.tree.tuple-unboxing

Inputs
nodesan object


Outputs
nodesan object


Definition
USING: assocs compiler.tree.combinators
compiler.tree.escape-analysis.allocations kernel namespaces ;

IN: compiler.tree.tuple-unboxing

: unbox-tuples ( nodes -- nodes )
allocations get escaping-allocations get [ key? ] curry
all-values? [ [ unbox-tuples* ] map-nodes ] unless ;