cocoa.messages: fix for deploy problem.
parent
bea7a405da
commit
d94977ac0c
|
@ -76,7 +76,7 @@ ERROR: no-objc-method name ;
|
||||||
|
|
||||||
MEMO: make-prepare-send ( selector method super? -- quot )
|
MEMO: make-prepare-send ( selector method super? -- quot )
|
||||||
[
|
[
|
||||||
[ \ <super> , ] when swap lookup-selector ,
|
[ \ <super> , ] when swap <selector> , \ selector ,
|
||||||
] [ ] make
|
] [ ] make
|
||||||
swap second length 2 - '[ _ _ ndip ] ;
|
swap second length 2 - '[ _ _ ndip ] ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue