--- a/RegressionTests__NumberTest.st	Tue Oct 10 17:05:03 2017 +0200
+++ b/RegressionTests__NumberTest.st	Tue Oct 10 17:43:16 2017 +0200
@@ -170,11 +170,13 @@
     self assert:( (Float pi printfPrintString:'%4.2f') = '3.14' ).
     "/ left filled
     self assert:( (Float pi printfPrintString:'%9f') = ' 3.141593' ).
+    self assert:( (Float pi printfPrintString:'%8.4f') = '  3.1416' ).
+
     "/ right filled
     self assert:( (Float pi printfPrintString:'%-9f') = '3.141593 ' ).
 
     "Created: / 10-10-2017 / 12:34:51 / cg"
-    "Modified: / 10-10-2017 / 16:29:07 / cg"
+    "Modified: / 10-10-2017 / 16:32:01 / cg"
 !
 
 testPrintf_Fraction
@@ -308,11 +310,14 @@
 
     "/ left filled
     self assert:( (ShortFloat pi printfPrintString:'%9f') = ' 3.141593' ).
+    self assert:( (ShortFloat pi printfPrintString:'%8.4f') = '  3.1416' ).
+
     "/ right filled
     self assert:( (ShortFloat pi printfPrintString:'%-9f') = '3.141593 ' ).
+    self assert:( (ShortFloat pi printfPrintString:'%-8.4f') = '3.1416  ' ).
 
     "Created: / 10-10-2017 / 12:35:12 / cg"
-    "Modified: / 10-10-2017 / 16:30:23 / cg"
+    "Modified: / 10-10-2017 / 16:32:31 / cg"
 ! !
 
 !NumberTest methodsFor:'tests-reading'!
@@ -380,5 +385,9 @@
 
 version
     ^ '$Header$'
+!
+
+version_CVS
+    ^ '$Header$'
 ! !