Implement #argumentCount for Block-compatibility.
(Got error when super>>#raiseRequest was sent for an #answer:do
in QuerySignal raiseRequest).
--- a/Object.st Fri Jan 21 17:53:26 2005 +0100
+++ b/Object.st Fri Jan 21 18:01:41 2005 +0100
@@ -4282,6 +4282,19 @@
!Object methodsFor:'evaluation'!
+argumentCount
+ "compatibility with Blocks and Messages.
+ Answer 0, since we only understand #value.
+
+ By implementing this, you can pass any object as an exception handler."
+
+ ^ 0
+
+ "
+ [1 // 0] on:ArithmeticError do:9999
+ "
+!
+
value
"return the receiver itself.
This allows every object to be used where blocks or valueHolders
@@ -9192,7 +9205,7 @@
!Object class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.517 2004-11-15 09:06:19 penk Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.518 2005-01-21 17:01:41 stefan Exp $'
! !
Object initialize!