--- a/AbstractTime.st	Tue Jul 01 12:55:05 2014 +0200
+++ b/AbstractTime.st	Tue Jul 01 15:58:11 2014 +0200
@@ -354,7 +354,7 @@
 !AbstractTime class methodsFor:'timing evaluations'!
 
 microsecondsToRun:aBlock
-    "evaluate the argument, aBlock; return the number of milliseconds it took"
+    "evaluate the argument, aBlock; return the number of microseconds it took"
 
     |startTime endTime|
 
@@ -366,6 +366,8 @@
     "
      Time microsecondsToRun:[1000 factorial]  
     "
+
+    "Modified (comment): / 01-07-2014 / 15:57:13 / az"
 !
 
 millisecondsToRun:aBlock
@@ -1276,10 +1278,10 @@
 !AbstractTime class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.81 2014-05-30 08:37:00 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.82 2014-07-01 13:58:11 az Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.81 2014-05-30 08:37:00 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.82 2014-07-01 13:58:11 az Exp $'
 ! !