--- a/RegressionTests__QDoubleTests.st	Mon Jun 19 17:57:14 2017 +0200
+++ b/RegressionTests__QDoubleTests.st	Mon Jun 19 18:12:40 2017 +0200
@@ -290,6 +290,22 @@
     "
 
     "Created: / 19-06-2017 / 16:58:29 / cg"
+!
+
+test_06_exp
+    |f1 q1|
+
+    f1 := 1.0 exp.
+    q1 := 1.0 asQDouble exp.
+
+    self assert:(q1 d0 = f1).
+
+    "
+     self run:#test_06_exp
+     self new test_06_exp
+    "
+
+    "Created: / 19-06-2017 / 17:58:08 / cg"
 ! !
 
 !QDoubleTests class methodsFor:'documentation'!