--- a/LargeInteger.st	Tue Sep 04 12:48:12 2001 +0200
+++ b/LargeInteger.st	Tue Sep 04 13:27:12 2001 +0200
@@ -1906,7 +1906,8 @@
 
     aStream nextPutAll:'('.
     self printOn:aStream.
-    aStream nextPutAll:' asLargeInteger)'! !
+    aStream nextPutAll:' asLargeInteger)'
+! !
 
 !LargeInteger methodsFor:'private'!
 
@@ -1921,7 +1922,7 @@
      shift "{ Class: SmallInteger }" |
 
     anInteger == 0 ifTrue:[
-        ^ DivisionByZeroSignal raiseRequest
+        ^ DivisionByZeroSignal raiseRequestWith:thisContext
     ].
 
     self = anInteger ifTrue:[
@@ -2015,7 +2016,7 @@
      ok|
 
     aPositiveSmallInteger == 0 ifTrue:[
-        ^ DivisionByZeroSignal raiseRequest
+        ^ DivisionByZeroSignal raiseRequestWith:thisContext
     ].
 
 "This cannot happen (if always normalized)
@@ -3029,7 +3030,7 @@
      shift "{ Class: SmallInteger }" |
 
     anInteger == 0 ifTrue:[
-        ^ DivisionByZeroSignal raiseRequest
+        ^ DivisionByZeroSignal raiseRequestWith:thisContext
     ].
 
     self = anInteger ifTrue:[
@@ -4366,5 +4367,5 @@
 !LargeInteger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.156 2000-10-25 12:07:18 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LargeInteger.st,v 1.157 2001-09-04 11:26:52 cg Exp $'
 ! !