class

Vocabulary

classes

Class description

The class of all class words.

Definition

USING: words ;

IN: classes

PREDICATE: class < word "class" word-prop ;

Methods

USING: classes stack-checker.dependencies ;

M: class add-depends-on-class +conditional+ depends-on ;


USING: classes command-line.parser.private ;

M: class argvalid? instance? ;


USING: classes help.private help.topics ;

M: class article-content word-with-methods ;


USING: accessors classes classes.private ;

M: class class-name name>> ;


USING: classes classes.tuple kernel ;

M: class final-class? drop t ;


USING: classes definitions generic kernel ;

M: class forget*
    [ M\ class forget* (call-next-method) ] [ forget-class ] bi
    ;


USING: classes classes.private definitions generic kernel
sequences ;

M: class forget-methods
    [ implementors ] [ [ swap ?lookup-method ] curry ] bi map
    forget-all ;


USING: arrays classes generic ;

M: class implementor-classes 1array ;


USING: assocs classes classes.private namespaces sets ;

M: class implementors implementors-map get at members ;


USING: classes kernel slots ;

M: class initial-value* drop f f ;


USING: classes combinators generic kernel slots words ;

M: class instance-check-quot
    {
        { [ dup object bootstrap-word eq? ] [ drop [ ] ] }
        { [ dup "coercer" word-prop ] [ "coercer" word-prop ] }
        [ M\ class instance-check-quot (call-next-method) ]
    } cond ;


USING: classes classes.private kernel ;

M: class metaclass-changed
    swap class? [ drop ] [ forget-class ] if ;


USING: classes kernel prettyprint.backend ;

M: class pprint-class \ f or pprint-word ;


USING: classes classes.private words ;

M: class reset-class
    {
        "defining-class"
        "class"
        "metaclass"
        "superclass"
        "members"
        "participants"
        "predicate"
    } remove-word-props ;


USING: classes hints ;

M: class specializer-declaration ;


USING: classes hints ;

M: class specializer-predicate '[ _ instance? ] ;


USING: classes classes.union.private kernel ;

M: class union-of-builtins? drop f ;


USING: classes classes.private kernel ;

M: class update-class drop ;


USING: arrays classes help help.markup kernel make prettyprint
words ;

M: class word-help*
    "enum-value" word-prop [
        [
            \ $description ,
            "An enumeration member with value " ,
            \ $snippet swap unparse 2array , "." ,
        ] { } make 1array
    ] [ f ] if* ;