blob: 5ad4af1bba88c9a9d145b2cec2733e0c73ba6509 (
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("failed");
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("failed");
endif
|
