--- a/RegressionTests__FloatTest.st	Mon Oct 16 11:11:55 2017 +0200
+++ b/RegressionTests__FloatTest.st	Mon Oct 16 14:57:46 2017 +0200
@@ -408,11 +408,18 @@
 !
 
 test05_Comparing
-    |check v1 v2 v1b 
+    |convArray check v1 v2 v1b 
      compiledMethod|
 
+    convArray := OrderedCollection new.
+    convArray addAll:#(yourself asInteger asFloat asShortFloat asLongFloat).
+
+    (Smalltalk at:#LargeFloat) notNil ifTrue:[
+        convArray add:#asLongFloat.
+    ].
+
     check := [:iv1 :iv2|
-        #(yourself asInteger asFloat asShortFloat asLongFloat asLargeFloat) do:[:conv1 |
+        convArray do:[:conv1 |
             v1 := (iv1 perform:conv1).
 
             self assert:( v1 = nil ) not.
@@ -420,7 +427,7 @@
             self assert:( v1 ~= nil ).
             self assert:( nil ~= v1 ).
 
-            #(yourself asInteger asFloat asShortFloat asLongFloat asLargeFloat) do:[:conv2 |
+            convArray do:[:conv2 |
                 v1b := (iv1 perform:conv2).
 
                 self assert:( v1 = v1b ).