--- a/LongFloat.st	Tue Sep 04 12:48:12 2001 +0200
+++ b/LongFloat.st	Tue Sep 04 13:27:12 2001 +0200
@@ -347,37 +347,37 @@
     LONGFLOAT result, val;
 
     if (__isSmallInteger(aNumber)) {
-	if (aNumber != __MKSMALLINT(0)) {
-	    result = __longFloatVal(self) / (LONGFLOAT)(__intVal(aNumber));
+        if (aNumber != __MKSMALLINT(0)) {
+            result = __longFloatVal(self) / (LONGFLOAT)(__intVal(aNumber));
 retResult:
-	    __qMKLFLOAT(newFloat, result);
-	    RETURN ( newFloat );
-	}
+            __qMKLFLOAT(newFloat, result);
+            RETURN ( newFloat );
+        }
     } else if (__isLongFloat(aNumber)) {
-	val = __longFloatVal(aNumber);
-	if (val != 0.0) {
-	    result = __longFloatVal(self) / val;
-	    goto retResult;
-	}
+        val = __longFloatVal(aNumber);
+        if (val != 0.0) {
+            result = __longFloatVal(self) / val;
+            goto retResult;
+        }
     } else if (__isFloatLike(aNumber)) {
-	val = (LONGFLOAT)(__floatVal(aNumber));
-	if (val != 0.0) {
-	    result = __longFloatVal(self) / val;
-	    goto retResult;
-	}
+        val = (LONGFLOAT)(__floatVal(aNumber));
+        if (val != 0.0) {
+            result = __longFloatVal(self) / val;
+            goto retResult;
+        }
     } else if (__isShortFloat(aNumber)) {
-	val = (LONGFLOAT)(__shortFloatVal(aNumber));
-	if (val != 0.0) {
-	    result = __longFloatVal(self) / val;
-	    goto retResult;
-	}
+        val = (LONGFLOAT)(__shortFloatVal(aNumber));
+        if (val != 0.0) {
+            result = __longFloatVal(self) / val;
+            goto retResult;
+        }
     }
 %}.
     ((aNumber == 0) or:[aNumber = 0.0]) ifTrue:[
-	"
-	 No, you shalt not divide by zero
-	"
-	^ DivisionByZeroSignal raiseRequest.
+        "
+         No, you shalt not divide by zero
+        "
+        ^ DivisionByZeroSignal raiseRequestWith:thisContext.
     ].
     ^ aNumber quotientFromLongFloat:self
 !
@@ -1014,5 +1014,5 @@
 !LongFloat class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LongFloat.st,v 1.16 2001-06-26 14:05:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LongFloat.st,v 1.17 2001-09-04 11:26:38 cg Exp $'
 ! !