compile-method-body ( lexenv block -- quot )

Vocabulary

smalltalk.compiler

Inputs

lexenv	an object
block	an object

Outputs

quot

an object

Definition

USING: accessors kernel math sequences smalltalk.compiler.return
;

IN: smalltalk.compiler

: compile-method-body ( lexenv block -- quot )
    [ [ (compile-method-body) ] [ arguments>> length 1 + ] bi ]
    2keep make-return ;