--- a/PrintfScanf.st	Tue Jun 20 13:00:10 2017 +0200
+++ b/PrintfScanf.st	Tue Jun 20 14:16:27 2017 +0200
@@ -473,9 +473,15 @@
      self printf:'%20.10f\n' on:Transcript arguments: { 1e1000 asLongFloat }
      self printf:'%20.10f\n' on:Transcript arguments: { 1e1000 asQDouble }
 
-     self printf:'%20.10f\n' on:Transcript arguments: { 1e10 asShortFloat uncheckedDivide: 0.0  }
-     self printf:'%20.10f\n' on:Transcript arguments: { 1e10 uncheckedDivide: 0.0  }
-     self printf:'%20.10f\n' on:Transcript arguments: { 1e10  }
+     self printf:'%20.10f\n' on:Transcript arguments: { 0.0 log10  }
+     self printf:'%20.10f\n' on:Transcript arguments: { 0.0 asShortFloat log10  }
+     self printf:'%20.10f\n' on:Transcript arguments: { 0.0 asLongFloat log10  }
+     self printf:'%20.10f\n' on:Transcript arguments: { 0.0 asQDouble log10  }
+
+     self printf:'%20.10f\n' on:Transcript arguments: { -1.0 log10   }
+     self printf:'%20.10f\n' on:Transcript arguments: { -1.0 asShortFloat log10  }
+     self printf:'%20.10f\n' on:Transcript arguments: { -1.0 asLongFloat log10  }
+     self printf:'%20.10f\n' on:Transcript arguments: { -1.0 asQDouble log10  }
     "
 
     |absVal exp x fuzz i|
@@ -540,7 +546,7 @@
         ]
     ]
 
-    "Modified (comment): / 20-06-2017 / 11:59:29 / cg"
+    "Modified (comment): / 20-06-2017 / 13:33:40 / cg"
 !
 
 absPrintFloat:aFloat on:aStream digits:digits