local-writer ( name lexenv -- local )

Vocabulary

smalltalk.compiler.lexenv

Inputs

name	an object
lexenv	an object

Outputs

local

an object

Definition

USING: accessors assocs kernel quotations ;

IN: smalltalk.compiler.lexenv

: local-writer ( name lexenv -- local )
    local-writers>> at dup [ 1quotation ] when ;