blob: 0757c6c39428f293006190324040948c260ab256 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
types_directive
d1 = Time1(2001, 2, 3, 60);
newDate = add(d1, 7); # check that a Time1 instance is accepted where Date is expected
if (newDate.day != 10)
error
endif
d2 = Time2(1999, 8, 7, 60);
newDate = add(d2, 7); # check that a Time2 instance is accepted where Date is expected
if (newDate.day != 14)
error
endif
|
