Fix more add/add* occurances
parent
c71a3e05c6
commit
6a2ab73938
|
@ -76,7 +76,7 @@ IN: cocoa.subclassing
|
|||
r> <method-list> class_addMethods ;
|
||||
|
||||
: encode-types ( return types -- encoding )
|
||||
swap add* [
|
||||
swap prefix [
|
||||
alien>objc-types get at "0" append
|
||||
] map concat ;
|
||||
|
||||
|
|
|
@ -40,7 +40,7 @@ unless
|
|||
: (parse-com-function) ( tokens -- definition )
|
||||
[ second ]
|
||||
[ first ]
|
||||
[ 3 tail 2 group [ first ] map "void*" add* ]
|
||||
[ 3 tail 2 group [ first ] map "void*" prefix ]
|
||||
tri
|
||||
<com-function-definition> ;
|
||||
|
||||
|
|
Loading…
Reference in New Issue