--- a/RegressionTests__IntegerTest.st	Sun Jul 21 21:08:48 2019 +0200
+++ b/RegressionTests__IntegerTest.st	Mon Jul 22 12:45:04 2019 +0200
@@ -3871,10 +3871,15 @@
     self assert:(2 raisedTo:2) == 4.
     self assert:(2 raisedTo:2.0) = 4.0.
     self assert:(2 raisedTo:100) = 1267650600228229401496703205376.
-    self assert:(((2 raisedTo:100) log:2) isAlmostEqualTo:100 nEpsilon:1).
-    self assert:(((2 raisedTo:100) integerLog2) == 100).
-
-    self assert:(((10 raisedTo:100) integerLog10) == 100).
+    
+    self assert:(((2 raisedTo:100) log:2) isAlmostEqualTo:100 nEpsilon:1) 
+         message:('(2^100)log2 is %1' bindWith:((2 raisedTo:100) log:2)).
+    self assert:(((2 raisedTo:100) integerLog2) == 100)
+         message:('(2^100)integerLog2 is %1' bindWith:((2 raisedTo:100) integerLog2)).
+
+    self assert:(((10 raisedTo:100) integerLog10) == 100)
+         message:('(10^100)integerLog10 is %1' bindWith:((10 raisedTo:100) integerLog10)).
+
     "/ currently, integerLog10 does not work with largeInts
     "/ self assert:(((10 raisedTo:1000) integerLog10) == 1000).
 
@@ -3884,6 +3889,7 @@
 
     "Created: / 02-07-2017 / 00:52:25 / cg"
     "Modified (comment): / 02-07-2017 / 14:39:26 / cg"
+    "Modified: / 22-07-2019 / 12:44:41 / Claus Gittinger"
 !
 
 testMiscMath2