--- a/RegressionTests__TimeAndDateTest.st Thu Jul 27 20:40:44 2017 +0200
+++ b/RegressionTests__TimeAndDateTest.st Thu Jul 27 20:55:56 2017 +0200
@@ -14,40 +14,42 @@
test_01_ReadingTimes
- self assert:(Time readFrom:'0:00' ) = (Time hour:0 minute:0 second:0).
- self assert:(Time readFrom:'2:00' ) = (Time hour:2 minute:0 second:0).
- self assert:(Time readFrom:'12:00' ) = (Time hour:12 minute:0 second:0).
- self assert:(Time readFrom:'14:00' ) = (Time hour:14 minute:0 second:0).
- self assert:(Time readFrom:'23:00' ) = (Time hour:23 minute:0 second:0).
- self assert:(Time readFrom:'24:00' ) = (Time hour:0 minute:0 second:0).
- self assert:(Time readFrom:'2:30 am' ) = (Time hour:2 minute:30 second:0).
- self assert:(Time readFrom:'2:30 pm' ) = (Time hour:14 minute:30 second:0).
- self assert:(Time readFrom:'14' ) = (Time hour:14 minute:0 second:0).
- self assert:(Time readFrom:'2 am' ) = (Time hour:2 minute:0 second:0).
- self assert:(Time readFrom:'2 pm' ) = (Time hour:14 minute:0 second:0).
- self assert:(Time readFrom:'12:05 pm') = (Time hour:12 minute:5 second:0).
- self assert:(Time readFrom:'12:06 am') = (Time hour:0 minute:6 second:0).
+ self assert:(Time readFrom:'0:00' ) = (Time hours:0 minutes:0 seconds:0).
+ self assert:(Time readFrom:'2:00' ) = (Time hours:2 minutes:0 seconds:0).
+ self assert:(Time readFrom:'12:00' ) = (Time hours:12 minutes:0 seconds:0).
+ self assert:(Time readFrom:'14:00' ) = (Time hours:14 minutes:0 seconds:0).
+ self assert:(Time readFrom:'23:00' ) = (Time hours:23 minutes:0 seconds:0).
+ self assert:(Time readFrom:'24:00' ) = (Time hours:0 minutes:0 seconds:0).
+ self assert:(Time readFrom:'2:30 am' ) = (Time hours:2 minutes:30 seconds:0).
+ self assert:(Time readFrom:'2:30 pm' ) = (Time hours:14 minutes:30 seconds:0).
+ self assert:(Time readFrom:'14' ) = (Time hours:14 minutes:0 seconds:0).
+ self assert:(Time readFrom:'2 am' ) = (Time hours:2 minutes:0 seconds:0).
+ self assert:(Time readFrom:'2 pm' ) = (Time hours:14 minutes:0 seconds:0).
+ self assert:(Time readFrom:'12:05 pm') = (Time hours:12 minutes:5 seconds:0).
+ self assert:(Time readFrom:'12:06 am') = (Time hours:0 minutes:6 seconds:0).
- self assert:(Time readFrom:'18:22:00') = (Time hour:18 minute:22 second:0).
- self assert:(Time readFrom:'14:00:11') = (Time hour:14 minute:0 second:11).
- self assert:(Time readFrom:'7:00:11' ) = (Time hour:7 minute:0 second:11).
- self assert:(Time readFrom:'24:00:00') = (Time hour:0 minute:0 second:0).
- self assert:(Time readFrom:'0:00:00' ) = (Time hour:0 minute:0 second:0).
- self assert:(Time readFrom:'12:00:00') = (Time hour:12 minute:0 second:0).
- self assert:(Time readFrom:'0:00:00' ) = (Time hour:0 minute:0 second:0).
- self assert:(Time readFrom:'6:22:00 pm' ) = (Time hour:18 minute:22 second:0).
- self assert:(Time readFrom:'2:00:11 pm' ) = (Time hour:14 minute:0 second:11).
- self assert:(Time readFrom:'7:00:11 am' ) = (Time hour:7 minute:0 second:11).
- self assert:(Time readFrom:'12:00:00 am') = (Time hour:0 minute:0 second:0).
- self assert:(Time readFrom:'0:00:00 am' ) = (Time hour:0 minute:0 second:0).
+ self assert:(Time readFrom:'18:22:00') = (Time hours:18 minutes:22 seconds:0).
+ self assert:(Time readFrom:'14:00:11') = (Time hours:14 minutes:0 seconds:11).
+ self assert:(Time readFrom:'7:00:11' ) = (Time hours:7 minutes:0 seconds:11).
+ self assert:(Time readFrom:'24:00:00') = (Time hours:0 minutes:0 seconds:0).
+ self assert:(Time readFrom:'0:00:00' ) = (Time hours:0 minutes:0 seconds:0).
+ self assert:(Time readFrom:'12:00:00') = (Time hours:12 minutes:0 seconds:0).
+ self assert:(Time readFrom:'0:00:00' ) = (Time hours:0 minutes:0 seconds:0).
+ self assert:(Time readFrom:'6:22:00 pm' ) = (Time hours:18 minutes:22 seconds:0).
+ self assert:(Time readFrom:'2:00:11 pm' ) = (Time hours:14 minutes:0 seconds:11).
+ self assert:(Time readFrom:'7:00:11 am' ) = (Time hours:7 minutes:0 seconds:11).
+ self assert:(Time readFrom:'12:00:00 am') = (Time hours:0 minutes:0 seconds:0).
+ self assert:(Time readFrom:'0:00:00 am' ) = (Time hours:0 minutes:0 seconds:0).
self should:[ Time readFrom:'24:00:00 am' ] raise:TimeConversionError.
- self assert:(Time readFrom:'12:00:00 pm') = (Time hour:12 minute:0 second:0).
+ self assert:(Time readFrom:'12:00:00 pm') = (Time hours:12 minutes:0 seconds:0).
self assert:(Time readFrom:'0:00:00 pm' onError:'invalid') = 'invalid'.
self should:[ Time readFrom:'24:00:00 pm' ] raise:TimeConversionError.
"
self new test_01_Reading
"
+
+ "Modified: / 27-07-2017 / 20:49:38 / mawalch"
!
test_02_ReadingDates