--- a/RegressionTests__QuadFloatTest.st	Thu Nov 21 23:38:47 2019 +0100
+++ b/RegressionTests__QuadFloatTest.st	Fri Nov 22 00:21:50 2019 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "{ Package: 'stx:goodies/regression' }"
 
 "{ NameSpace: RegressionTests }"
@@ -672,15 +670,6 @@
 
     self skipIf:(ExternalAddress pointerSize == 4) description:'only supported on 64bit machines'.
 
-    check := [:num |
-        self assert:( num fractionPart + num truncated ) = num.
-        self assert:( num fractionPart + num truncated ) class == num class.
-    ].
-
-    check value:1.6 asQuadFloat.
-    check value:-1.6 asQuadFloat.
-
-
     self assert:( 1.6 asQuadFloat ceiling ) = 2.
 
     self assert:( 1.6 asQuadFloat ceilingAsFloat ) = 2.0 asQuadFloat.
@@ -730,6 +719,15 @@
     self assert:( -0.5 asQuadFloat truncatedAsFloat = 0.0 ).
     self assert:( -0.6 asQuadFloat truncatedAsFloat = 0.0 ).
 
+    check := [:num |
+        self assert:( num fractionPart + num truncated ) = num.
+        self assert:( num fractionPart + num truncated ) class == num class.
+    ].
+
+    check value:1.6 asQuadFloat.
+    check value:-1.6 asQuadFloat.
+
+
     "
      self basicNew test07_Truncation
     "