#QUALITY by exept
class: RegressionTests::FloatTest
changed: #test08_Representation
--- a/RegressionTests__FloatTest.st Sun Dec 01 12:45:23 2019 +0100
+++ b/RegressionTests__FloatTest.st Sun Dec 01 16:04:40 2019 +0100
@@ -900,6 +900,9 @@
self assert:( ShortFloat unity = 1 asShortFloat ).
self assert:( Float unity = 1 asFloat ).
+ self assert:( 1.0 asShortFloat exponentBits = 127 ).
+ self assert:( 1.0 exponentBits = 1023 ).
+
self assert:( 0.0 exponent = 0 ).
self assert:( 1.0 exponent = 1 ).
self assert:( 2.0 exponent = 2 ).