Float.st
changeset 6574 788f5a36dcb1
parent 6344 f49b43e5b724
child 6674 c383bfa3dc8c
--- a/Float.st	Tue Jun 11 23:41:35 2002 +0200
+++ b/Float.st	Tue Jun 11 23:43:11 2002 +0200
@@ -521,6 +521,22 @@
     "Modified: 23.4.1996 / 09:27:02 / cg"
 !
 
+precision
+   "answer the precision of a Float
+    This is an IEEE float, only the fraction from the normalized mantissa is stored 
+    and so there is a hidden bit and the mantissa is actually represented 
+    by 53 binary digits"
+
+    ^  53
+!
+
+radix
+   "answer the radix of a Float
+    This is an IEEE float, which is represented as binary"
+
+    ^  2
+!
+
 unity
     "return the neutral element for multiplication (1.0) as Float"
 
@@ -2230,6 +2246,6 @@
 !Float class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.125 2001-12-19 14:24:46 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Float.st,v 1.126 2002-06-11 21:42:34 stefan Exp $'
 ! !
 Float initialize!