--- a/ReadEvalPrintLoop.st Tue Dec 06 13:43:43 2011 +0100
+++ b/ReadEvalPrintLoop.st Tue Dec 06 13:45:05 2011 +0100
@@ -373,8 +373,12 @@
output cr.
timingFlag == true ifTrue:[
'execution time: ' printOn:output.
- t printOn:output.
- 'ms' printOn:output.
+ t = 0 ifTrue:[
+ 'too small to measure (<1ms)' printOn:output.
+ ] ifFalse:[
+ t printOn:output.
+ 'ms' printOn:output.
+ ].
output cr.
].
].
@@ -388,15 +392,15 @@
"
"Created: / 07-12-2006 / 17:27:21 / cg"
- "Modified: / 06-12-2011 / 13:43:33 / cg"
+ "Modified: / 06-12-2011 / 13:44:57 / cg"
! !
!ReadEvalPrintLoop class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.33 2011-12-06 12:43:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.34 2011-12-06 12:45:05 cg Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.33 2011-12-06 12:43:43 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ReadEvalPrintLoop.st,v 1.34 2011-12-06 12:45:05 cg Exp $'
! !