register-objc-method ( classname method -- )

Vocabulary

cocoa.messages

Inputs

classname	an object
method	an object

Outputs

None

Definition

USING: assocs kernel namespaces sequences ;

IN: cocoa.messages

:: register-objc-method ( classname method -- )
    method method-signature :> signature method method-name
    :> name classname "." name 3append
    :> fullname signature first [
        signature cache-stubs
        signature name objc-methods get set-at
        signature fullname objc-methods get set-at
    ] [ classname name method warn-unknown-objc-method ] if ;