--- a/Block.st Thu Jan 29 12:20:01 2015 +0100
+++ b/Block.st Thu Jan 29 12:20:39 2015 +0100
@@ -843,7 +843,7 @@
micros := endTime - startTime.
Transcript show:anInfoString.
- micros < 10000 ifTrue:[
+ micros < 1000 ifTrue:[
Transcript show:micros; show:' µs'.
] ifFalse:[
micros < 100000 ifTrue:[
@@ -3175,11 +3175,11 @@
!Block class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.208 2015-01-29 11:20:01 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.209 2015-01-29 11:20:39 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.208 2015-01-29 11:20:01 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/Block.st,v 1.209 2015-01-29 11:20:39 cg Exp $'
! !