compile-smalltalk ( statement -- quot )

Vocabulary

smalltalk.compiler

Inputs

statement

an object

Outputs

quot

an object

Definition

USING: kernel smalltalk.compiler.lexenv
smalltalk.compiler.return ;

IN: smalltalk.compiler

: compile-smalltalk ( statement -- quot )
    [ empty-lexenv ] dip [ compile-sequence nip 0 ] 2keep
    make-return ;