make-temporaries ( block lexenv -- quot )

Vocabulary

smalltalk.compiler

Inputs

block	an object
lexenv	an object

Outputs

quot

an object

Definition

USING: accessors kernel locals.types sequences ;

IN: smalltalk.compiler

: make-temporaries ( block lexenv -- quot )
    [ temporaries>> ] dip lookup-block-vars
    [ <def> [ f ] swap suffix ] map [ ] join ;