--- a/RegressionTests__TimeDurationTest.st Tue May 08 12:27:29 2012 +0200
+++ b/RegressionTests__TimeDurationTest.st Wed May 09 12:14:49 2012 +0200
@@ -44,7 +44,7 @@
m := hmsms second.
s := hmsms third.
ms := hmsms fourth.
- d1 := TimeDuration hours:h minutes:m seconds:s millis:ms.
+ d1 := TimeDuration hours:h minutes:m seconds:s milliseconds:ms.
s1 := d1 printString.
d2 := TimeDuration readFrom:s1.
s2 := d2 printString.
@@ -54,13 +54,13 @@
].
-"/ (TimeDuration hours:0 minutes:0 seconds:0 millis:123) printStringFormat:'%h:%m:%s'
-"/ (TimeDuration hours:0 minutes:0 seconds:10 millis:123) printStringFormat:'%h:%m:%s'
-"/ (TimeDuration hours:0 minutes:33 seconds:0 millis:123) printStringFormat:'%h:%m:%s'
-"/ (TimeDuration hours:2 minutes:33 seconds:0 millis:123) printStringFormat:'%h:%m:%s'
-"/ (TimeDuration hours:100 minutes:33 seconds:0 millis:123) printStringFormat:'%h:%m:%s'
-"/ (TimeDuration hours:10000 minutes:33 seconds:0 millis:123) printStringFormat:'%h:%m:%s'
-"/ (TimeDuration hours:1000000 minutes:33 seconds:0 millis:123) printStringFormat:'%h:%m:%s'
+"/ (TimeDuration hours:0 minutes:0 seconds:0 milliseconds:123) printStringFormat:'%h:%m:%s'
+"/ (TimeDuration hours:0 minutes:0 seconds:10 milliseconds:123) printStringFormat:'%h:%m:%s'
+"/ (TimeDuration hours:0 minutes:33 seconds:0 milliseconds:123) printStringFormat:'%h:%m:%s'
+"/ (TimeDuration hours:2 minutes:33 seconds:0 milliseconds:123) printStringFormat:'%h:%m:%s'
+"/ (TimeDuration hours:100 minutes:33 seconds:0 milliseconds:123) printStringFormat:'%h:%m:%s'
+"/ (TimeDuration hours:10000 minutes:33 seconds:0 milliseconds:123) printStringFormat:'%h:%m:%s'
+"/ (TimeDuration hours:1000000 minutes:33 seconds:0 milliseconds:123) printStringFormat:'%h:%m:%s'
"
self new test_01_PrintingReading