--- a/ArithmeticValue.st	Tue Mar 07 22:55:20 1995 +0100
+++ b/ArithmeticValue.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/ArithmeticValue.st,v 1.10 1994-11-28 20:32:12 claus Exp $
+$Header: /cvs/stx/stx/libbasic/ArithmeticValue.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/ArithmeticValue.st,v 1.10 1994-11-28 20:32:12 claus Exp $
+$Header: /cvs/stx/stx/libbasic/ArithmeticValue.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'.