diff -r 35e40a6fc72b -r 1f76060d58a4 ArithVal.st --- 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'.