--- a/ArithmeticValue.st	Wed Jun 21 10:38:46 2017 +0200
+++ b/ArithmeticValue.st	Wed Jun 21 10:58:28 2017 +0200
@@ -733,11 +733,14 @@
 
 asFloatQ
     "return a quad precision float with same value.
+     Notice that longFloats as returned here may or may not provide more
+     precision than a double - depending on the machine's CPU.
      Added for ANSI compatibility"
 
    ^ self asLongFloat
 
-    "Created: / 7.9.2001 / 13:38:44 / cg"
+    "Created: / 07-09-2001 / 13:38:44 / cg"
+    "Modified (comment): / 21-06-2017 / 10:54:27 / cg"
 !
 
 asFraction