SmallInteger.st
changeset 7141 033f2c26d8e6
parent 6676 15f2e3080e13
child 7156 c543eb02458a
--- a/SmallInteger.st	Mon Mar 31 11:12:58 2003 +0200
+++ b/SmallInteger.st	Mon Mar 31 11:15:41 2003 +0200
@@ -520,7 +520,7 @@
 %}.
     aNumber isInteger ifTrue:[
         aNumber == 0 ifTrue:[
-            ^ DivisionByZeroSignal raiseRequestWith:thisContext.
+            ^ ZeroDivide raiseRequestWith:thisContext.
         ].
         ^ Fraction numerator:self denominator:aNumber
     ].
@@ -616,7 +616,7 @@
     }
 %}.
     (aNumber = 0) ifTrue:[
-        ^ DivisionByZeroSignal raiseRequestWith:thisContext.
+        ^ ZeroDivide raiseRequestWith:thisContext.
     ].
     ^ self retry:#// coercing:aNumber
 
@@ -688,7 +688,7 @@
     }
 %}.
     (aNumber = 0) ifTrue:[
-        ^ DivisionByZeroSignal raiseRequestWith:thisContext.
+        ^ ZeroDivide raiseRequestWith:thisContext.
     ].
     ^ self retry:#\\ coercing:aNumber
 
@@ -779,7 +779,7 @@
     }
 %}.
     (aNumber = 0) ifTrue:[
-        ^ DivisionByZeroSignal raiseRequestWith:thisContext.
+        ^ ZeroDivide raiseRequestWith:thisContext.
     ].
     ^ self retry:#quo: coercing:aNumber
 
@@ -3309,5 +3309,5 @@
 !SmallInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.149 2002-07-31 10:30:19 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SmallInteger.st,v 1.150 2003-03-31 09:15:41 cg Exp $'
 ! !