--- a/QDouble.st Sun Nov 24 16:16:38 2019 +0100
+++ b/QDouble.st Sun Nov 24 16:16:50 2019 +0100
@@ -1184,7 +1184,9 @@
!
numBitsInExponent
- "answer the number of bits in the exponent"
+ "answer the number of bits in the exponent.
+ I use regular IEEE doubles to store the value,
+ thus my exponent bits are the same as double's exponent bits"
^ Float numBitsInExponent
@@ -1403,6 +1405,13 @@
!
exponent
+ "extract a normalized float's (unbiased) exponent.
+ The returned value depends on the float-representation of
+ the underlying machine and is therefore highly unportable.
+ This is not for general use.
+ This assumes that the mantissa is normalized to
+ 0.5 .. 1.0 and the float's value is: mantissa * 2^exp"
+
^ self d0 exponent
"Created: / 20-06-2017 / 11:06:02 / cg"