equal
deleted
inserted
replaced
626 is about to be executed. |
626 is about to be executed. |
627 In this case, the VM sends this to the bad method (the receiver). |
627 In this case, the VM sends this to the bad method (the receiver). |
628 Can only happen when the Compiler/runtime system is broken or |
628 Can only happen when the Compiler/runtime system is broken or |
629 someone played around." |
629 someone played around." |
630 |
630 |
631 ^ InvalidCodeSignal |
631 ^ InvalidCodeError |
632 raiseRequestWith:self |
632 raiseRequestWith:self |
633 errorString:'invalid block - not executable' |
633 errorString:'invalid block - not executable' |
634 |
634 |
635 "Modified: 4.11.1996 / 22:46:39 / cg" |
635 "Modified: 4.11.1996 / 22:46:39 / cg" |
636 ! ! |
636 ! ! |
637 |
637 |
638 !Block methodsFor:'evaluation'! |
638 !Block methodsFor:'evaluation'! |
1159 error: ; |
1159 error: ; |
1160 %}. |
1160 %}. |
1161 " |
1161 " |
1162 the above code only supports up-to 12 arguments |
1162 the above code only supports up-to 12 arguments |
1163 " |
1163 " |
1164 ^ ArgumentSignal |
1164 ^ ArgumentError |
1165 raiseRequestWith:self |
1165 raiseRequestWith:self |
1166 errorString:'only blocks with up-to 12 arguments supported' |
1166 errorString:'only blocks with up-to 12 arguments supported' |
1167 ! |
1167 ! |
1168 |
1168 |
1169 valueWithOptionalArgument:arg |
1169 valueWithOptionalArgument:arg |
1973 ! ! |
1973 ! ! |
1974 |
1974 |
1975 !Block class methodsFor:'documentation'! |
1975 !Block class methodsFor:'documentation'! |
1976 |
1976 |
1977 version |
1977 version |
1978 ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.134 2003-06-13 18:47:46 cg Exp $' |
1978 ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.135 2003-09-05 10:29:15 stefan Exp $' |
1979 ! ! |
1979 ! ! |
1980 |
1980 |
1981 Block initialize! |
1981 Block initialize! |