--- a/RegressionTests__QDoubleTests.st	Mon Jul 03 13:58:38 2017 +0200
+++ b/RegressionTests__QDoubleTests.st	Mon Jul 03 14:57:29 2017 +0200
@@ -6,7 +6,7 @@
 	instanceVariableNames:''
 	classVariableNames:''
 	poolDictionaries:''
-	category:'tests-regression'
+	category:'tests-Regression-Numbers'
 !
 
 !QDoubleTests class methodsFor:'documentation'!
@@ -435,6 +435,41 @@
     "Modified (comment): / 21-06-2017 / 13:45:56 / cg"
 !
 
+test_06b_log10
+    |q1 q2 d3a q3a d3b q3b q4 i|
+
+    q1 := QDouble d0: 5.55111512312578E-18 
+                  d1: -3.08148791101958E-34 
+                  d2: 1.71056941445901E-50 
+                  d3: 0.0.
+
+    q2 := 10 / q1.
+    self assert:(q2 > 1e18).
+
+    d3a := q2 asFloat ln.
+    self assert:(d3a isNaN not).
+    
+    q3a := q2 ln.
+    self assert:(q3a isNaN not).
+    
+    d3b := q2 asFloat log10.
+    self assert:(d3b isNaN not).
+
+    q3b := q2 log10.
+    self assert:(q3b isNaN not).
+
+    q4 := q3b floor.
+    i := q4 asInteger.
+
+
+    "
+     self run:#test_06b_log10
+     self new test_06b_log10
+    "
+
+    "Created: / 03-07-2017 / 10:31:53 / cg"
+!
+
 test_07_reading
     |q1 s|