(parse-objc-type) ( i string -- ctype )

Vocabulary

cocoa.messages

Inputs

i	an object
string	an object

Outputs

ctype

an object

Definition

USING: alien.c-types combinators kernel math sequences ;

IN: cocoa.messages

: (parse-objc-type) ( i string -- ctype )
    [ [ 1 + ] dip ] [ nth ] 2bi {
        { [ dup "rnNoORV" member? ] [ drop (parse-objc-type) ] }
        { [ dup 94 = ] [ 3drop void* ] }
        { [ dup 123 = ] [ drop objc-struct-type ] }
        { [ dup 91 = ] [ 3drop void* ] }
        [ 2nip decode-type ]
    } cond ;