Block.st
branchjv
changeset 21242 19fabe339f8b
parent 21024 8734987eb5c7
parent 21123 431c0e8f2dd8
child 21387 e3865533e6a6
--- a/Block.st	Tue Dec 06 07:06:38 2016 +0100
+++ b/Block.st	Sun Dec 18 11:19:27 2016 +0000
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -711,7 +709,6 @@
 ! !
 
 
-
 !Block methodsFor:'accessing'!
 
 home
@@ -762,7 +759,7 @@
 
 numArgs
     "return the number of arguments I expect for evaluation.
-     Please use argumentCount, which is ANSI"
+     Please use argumentCount for ANSI compatibility"
 
 "/    <resource: #obsolete>
 
@@ -906,7 +903,7 @@
     micros < 1000 ifTrue:[
         "/ too stupid: many fonts do not have a mu,
         "/ so I output it as us here.
-        Transcript show:micros; show:' µs'.
+        Transcript show:micros; show:' s'.
     ] ifFalse:[
         micros < 100000 ifTrue:[
             millis := (micros / 1000.0) asFixedPointRoundedToScale:2.