--- a/ArithVal.st Tue Mar 07 22:55:20 1995 +0100
+++ b/ArithVal.st Thu Mar 09 00:40:27 1995 +0100
@@ -23,7 +23,7 @@
COPYRIGHT (c) 1993 by Claus Gittinger
All Rights Reserved
-$Header: /cvs/stx/stx/libbasic/Attic/ArithVal.st,v 1.10 1994-11-28 20:32:12 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/ArithVal.st,v 1.11 1995-03-08 23:36:06 claus Exp $
'!
!ArithmeticValue class methodsFor:'documentation' !
@@ -44,7 +44,7 @@
version
"
-$Header: /cvs/stx/stx/libbasic/Attic/ArithVal.st,v 1.10 1994-11-28 20:32:12 claus Exp $
+$Header: /cvs/stx/stx/libbasic/Attic/ArithVal.st,v 1.11 1995-03-08 23:36:06 claus Exp $
"
!
@@ -78,9 +78,9 @@
"setup the signals"
DomainErrorSignal isNil ifTrue:[
- Object initialize.
+ ErrorSignal isNil ifTrue:[super initialize].
- ArithmeticSignal := Object errorSignal newSignalMayProceed:false.
+ ArithmeticSignal := ErrorSignal newSignalMayProceed:false.
ArithmeticSignal nameClass:self message:#arithmeticSignal.
ArithmeticSignal notifierString:'arithmetic error'.