(define-objc-class) ( methods protocols superclass name -- )

Vocabulary

cocoa.subclassing

Inputs

methods	an object
protocols	an object
superclass	an object
name	an object

Outputs

None

Definition

USING: cocoa.messages cocoa.runtime kernel ;

IN: cocoa.subclassing

: (define-objc-class)
    ( methods protocols superclass name -- )
    [ objc-class ] dip 0 objc_allocateClassPair
    [ add-protocols ] [ add-methods ] [ objc_registerClassPair ]
    tri ;