equal
deleted
inserted
replaced
356 Here, true is returned for myself, false for subclasses." |
356 Here, true is returned for myself, false for subclasses." |
357 |
357 |
358 ^ self == Block |
358 ^ self == Block |
359 |
359 |
360 "Modified: 23.4.1996 / 15:55:58 / cg" |
360 "Modified: 23.4.1996 / 15:55:58 / cg" |
|
361 ! ! |
|
362 |
|
363 !Block methodsFor:'Compatibility - Squeak'! |
|
364 |
|
365 ifError:handlerBlock |
|
366 ^ self on:Error do:handlerBlock |
361 ! ! |
367 ! ! |
362 |
368 |
363 !Block methodsFor:'Compatibility - V''Age'! |
369 !Block methodsFor:'Compatibility - V''Age'! |
364 |
370 |
365 argumentCount |
371 argumentCount |
1692 ! ! |
1698 ! ! |
1693 |
1699 |
1694 !Block class methodsFor:'documentation'! |
1700 !Block class methodsFor:'documentation'! |
1695 |
1701 |
1696 version |
1702 version |
1697 ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.93 1999-10-11 08:01:24 cg Exp $' |
1703 ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.94 1999-11-23 12:02:03 cg Exp $' |
1698 ! ! |
1704 ! ! |
1699 Block initialize! |
1705 Block initialize! |