equal
deleted
inserted
replaced
534 argArray do:[:arg | arg isSuper ifTrue:[ |
534 argArray do:[:arg | arg isSuper ifTrue:[ |
535 ^ 'super special semantic only with message sends' |
535 ^ 'super special semantic only with message sends' |
536 ] |
536 ] |
537 ]. |
537 ]. |
538 ]. |
538 ]. |
|
539 |
|
540 "/ receiver isBlock ifTrue:[ |
|
541 "/ ([] respondsTo:selector) ifFalse:[ |
|
542 "/ ^ 'blocks do not respond to ' , selector , '; Missing ''.'' between statements ?' |
|
543 "/ ]. |
|
544 "/ ]. |
|
545 |
539 ^ nil |
546 ^ nil |
540 |
547 |
541 "Modified: / 16.7.1998 / 20:29:53 / cg" |
548 "Modified: / 16.7.1998 / 20:29:53 / cg" |
542 ! ! |
549 ! ! |
543 |
550 |
3047 ! ! |
3054 ! ! |
3048 |
3055 |
3049 !MessageNode class methodsFor:'documentation'! |
3056 !MessageNode class methodsFor:'documentation'! |
3050 |
3057 |
3051 version |
3058 version |
3052 ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.118 2000-12-19 18:55:10 tm Exp $' |
3059 ^ '$Header: /cvs/stx/stx/libcomp/MessageNode.st,v 1.119 2001-04-11 11:50:38 cg Exp $' |
3053 ! ! |
3060 ! ! |