--- a/RegressionTests__NumberTest.st	Tue Dec 17 14:42:01 2019 +0100
+++ b/RegressionTests__NumberTest.st	Tue Dec 17 14:42:12 2019 +0100
@@ -816,6 +816,20 @@
 testReadFrom
     self assert: 1.0e-14    = (Number readFrom: '1.0e-14').
 
+    #(
+        '0'                   0                   '0' 
+        '-0'                  0                   '0' 
+        '00'                  0                   '0' 
+        '000'                 0                   '0' 
+        '0x0'                 0                   '0' 
+        '0b0'                 0                   '0' 
+        '16r0'                0                   '0' 
+        '4865804016353280000' 4865804016353280000 '4865804016353280000'
+    ) inGroupsOf:3 do:[:str :expected :expectedPrintString|
+        self assert:(Number readFrom:str) = expected.
+        self assert:expected printString = expectedPrintString.
+    ].
+
     self assert: ('1' asNumber = 1).
     self assert: ('10' asNumber = 10).
 
@@ -905,7 +919,7 @@
     ].
 
     "Modified: / 20-06-2017 / 14:05:37 / cg"
-    "Modified: / 17-12-2019 / 14:22:34 / Stefan Reise"
+    "Modified: / 17-12-2019 / 14:39:17 / Stefan Reise"
 ! !
 
 !NumberTest class methodsFor:'documentation'!