Float.st
changeset 20706 009b8269bd08
parent 20415 b4da57dd7252
child 20799 5dfe67b1daf1
--- a/Float.st	Tue Nov 01 20:03:09 2016 +0100
+++ b/Float.st	Wed Nov 02 01:45:08 2016 +0100
@@ -1998,7 +1998,7 @@
      OS, which was not kind enough to give it.
      Bad luck - you should increase the swap space on your machine.
     "
-    ^ ObjectMemory allocationFailureSignal raise.
+    ^ AllocationFailure raise.
 
     "
 	1.0 printString
@@ -2041,23 +2041,23 @@
     int len;
 
     if (__isStringLike(formatString)) {
-        /*
-         * actually only needed on sparc: since thisContext is
-         * in a global register, which gets destroyed by printf,
-         * manually save it here - very stupid ...
-         */
-        __BEGIN_PROTECT_REGISTERS__
-
-        len = snprintf(buffer, sizeof(buffer), __stringVal(formatString), __floatVal(self));
-
-        __END_PROTECT_REGISTERS__
-
-        if (len < 0) goto fail;
-
-        s = __MKSTRING_L(buffer, len);
-        if (s != nil) {
-            RETURN (s);
-        }
+	/*
+	 * actually only needed on sparc: since thisContext is
+	 * in a global register, which gets destroyed by printf,
+	 * manually save it here - very stupid ...
+	 */
+	__BEGIN_PROTECT_REGISTERS__
+
+	len = snprintf(buffer, sizeof(buffer), __stringVal(formatString), __floatVal(self));
+
+	__END_PROTECT_REGISTERS__
+
+	if (len < 0) goto fail;
+
+	s = __MKSTRING_L(buffer, len);
+	if (s != nil) {
+	    RETURN (s);
+	}
     }
 fail: ;
 %}.
@@ -2123,7 +2123,7 @@
      OS, which was not kind enough to give it.
      Bad luck - you should increase the swap space on your machine.
     "
-    ^ ObjectMemory allocationFailureSignal raise.
+    ^ AllocationFailure raise.
 
     "
 	1.0 storeString
@@ -2333,7 +2333,7 @@
     RETURN (__MKFLOAT(frac));
 %}.
     ^ super mantissa
-    
+
     "
      1.0 exponent
      1.0 mantissa