class-name ( name -- quot/f )

Vocabulary

smalltalk.compiler.lexenv

Inputs

name

an object

Outputs

quot/f

an object

Definition

USING: assocs kernel namespaces smalltalk.classes ;

IN: smalltalk.compiler.lexenv

: class-name ( name -- quot/f )
    classes get at dup [ [ ] curry ] when ;