diff options
| author | Gaius Mulley <gaiusmod2@gmail.com> | 2023-09-30 00:48:09 +0100 |
|---|---|---|
| committer | Gaius Mulley <gaiusmod2@gmail.com> | 2023-09-30 00:48:09 +0100 |
| commit | c00fcbdab84aa20229d5ea0e0604a8367686447c (patch) | |
| tree | 0d228a54f118fb6f0b316606889de0716af65a40 | |
| parent | 44efc743acc01354b6b9eb1939aedfdcc44e71f3 (diff) | |
| download | gcc-c00fcbdab84aa20229d5ea0e0604a8367686447c.zip gcc-c00fcbdab84aa20229d5ea0e0604a8367686447c.tar.gz gcc-c00fcbdab84aa20229d5ea0e0604a8367686447c.tar.bz2 | |
modula2: testsuite correction to m2date.mod
This patch corrects the m2date day of the week message.
The days of the week array start with Thursday reflecting the
1st Jan 1970.
gcc/testsuite/ChangeLog:
* gm2/iso/run/pass/m2date.mod (DayName): Reordered.
Signed-off-by: Gaius Mulley <gaiusmod2@gmail.com>
| -rw-r--r-- | gcc/testsuite/gm2/iso/run/pass/m2date.mod | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/testsuite/gm2/iso/run/pass/m2date.mod b/gcc/testsuite/gm2/iso/run/pass/m2date.mod index 1d8b595..f7e0c3c 100644 --- a/gcc/testsuite/gm2/iso/run/pass/m2date.mod +++ b/gcc/testsuite/gm2/iso/run/pass/m2date.mod @@ -13,7 +13,8 @@ TYPE CONST Debugging = FALSE ; - DayName = DayArray { "Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun" } ; + (* 1st January 1970 was a Thursday. *) + DayName = DayArray { "Thu", "Fri", "Sat", "Sun", "Mon", "Tue", "Wed" } ; MonthName = MonthArray { "Dec", "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov" } ; |