--- a/LimitedPrecisionReal.st	Thu Jun 07 16:28:47 2018 +0200
+++ b/LimitedPrecisionReal.st	Thu Jun 07 16:28:55 2018 +0200
@@ -1032,10 +1032,10 @@
     "return a large float with (approximately) my value.
      If the largeFloat class is not present, a regular float is returned"
 
-    ^ (LargeFloat ? Float) fromLimitedPrecisionReal:self
+    ^ (LargeFloat ? LongFloat ? Float) fromLimitedPrecisionReal:self
 
     "Modified (comment): / 12-06-2017 / 20:57:05 / cg"
-    "Modified (comment): / 07-06-2018 / 16:22:50 / Claus Gittinger"
+    "Modified: / 07-06-2018 / 16:28:03 / Claus Gittinger"
 !
 
 asLimitedPrecisionReal