flatten-recursive ( #recursive -- nodes )

Vocabulary

compiler.tree.cleanup

Inputs

#recursive

a #recursive

Outputs

nodes

a sequence

Word description

Converts #enter-recursive and #return-recursive into #copy nodes.

Definition

USING: accessors sequences ;

IN: compiler.tree.cleanup

: flatten-recursive ( #recursive -- nodes )
    child>> unclip >copy prefix unclip-last >copy suffix ;