From d838c41bf2d47b0046b72c3ac655b968aa382b62 Mon Sep 17 00:00:00 2001 From: Dianne Skoll Date: Fri, 16 Sep 2022 14:14:06 -0400 Subject: [PATCH] Add tests for stdout() function. --- man/remind.1.in | 15 + src/funcs.c | 31 ++ tests/test-rem | 11 + tests/test.cmp | 1101 ++++++++++++++++++++++++----------------------- tests/test.rem | 1 + 5 files changed, 611 insertions(+), 548 deletions(-) diff --git a/man/remind.1.in b/man/remind.1.in index ac9dea41..ce0eee81 100644 --- a/man/remind.1.in +++ b/man/remind.1.in @@ -3280,6 +3280,21 @@ May 16 and 17. You can go backwards, too, so: takes \fIa\fR back to 2009-05-13. .RE .TP +.B stdout() +Returns a string representing where Remind's standard output is going. +The return values are one of the following: "TTY" if standard-output +is a terminal, "BLOCKDEV" if it is a block device (very unlikely), +"CHARDEV" if it is a character device (eg, /dev/null), "DIR" if it +is a directory (very unlikely), "PIPE" if it is a pipe or FIFO, +"SYMLINK" if it is a symlink (very unlikely), "SOCKET" if it is a +socket, or "UNKNOWN" if it could not be determined. +.RS +.PP +The purpose of \fBstdout()\fR is mostly to distinguish between TTY +and non-TTY output; you may wish to change or disable colors if the +output is not going to a TTY. +.RE +.TP .B strlen(s_str) Returns the length of \fIstr\fR. If the length of \fIstr\fR is too large to represent as an integer, emits a "Number too high" error. diff --git a/src/funcs.c b/src/funcs.c index 8ad51fe3..f8c962b5 100644 --- a/src/funcs.c +++ b/src/funcs.c @@ -121,6 +121,7 @@ static int FRealtoday (func_info *); static int FSgn (func_info *); static int FShell (func_info *); static int FSlide (func_info *); +static int FStdout (func_info *); static int FStrlen (func_info *); static int FSubstr (func_info *); static int FSunrise (func_info *); @@ -276,6 +277,7 @@ BuiltinFunc Func[] = { { "shell", 1, 2, 0, FShell }, { "shellescape", 1, 1, 1, FShellescape }, { "slide", 2, NO_MAX, 0, FSlide }, + { "stdout", 0, 0, 1, FStdout }, { "strlen", 1, 1, 1, FStrlen }, { "substr", 2, 3, 1, FSubstr }, { "sunrise", 0, 1, 0, FSunrise}, @@ -1237,6 +1239,35 @@ static int FLower(func_info *info) return OK; } +/***************************************************************/ +/* */ +/* FStdout - return the type of file descriptor for stdout */ +/* */ +/***************************************************************/ +static int FStdout(func_info *info) +{ + struct stat statbuf; + int r; + + if (isatty(STDOUT_FILENO)) { + return RetStrVal("TTY", info); + } + if (fstat(STDOUT_FILENO, &statbuf) < 0) { + return RetStrVal("UNKNOWN", info); + } + switch(statbuf.st_mode & S_IFMT) { + case S_IFBLK: r = RetStrVal("BLOCKDEV", info); break; + case S_IFCHR: r = RetStrVal("CHARDEV", info); break; + case S_IFDIR: r = RetStrVal("DIR",info); break; + case S_IFIFO: r = RetStrVal("PIPE",info); break; + case S_IFLNK: r = RetStrVal("SYMLINK", info); break; + case S_IFREG: r = RetStrVal("FILE",info); break; + case S_IFSOCK: r = RetStrVal("SOCKET", info); break; + default: r = RetStrVal("UNKNOWN", info); break; + } + return r; +} + /***************************************************************/ /* */ /* FToday - return the system's notion of "today" */ diff --git a/tests/test-rem b/tests/test-rem index ebbbb532..725a0fc5 100644 --- a/tests/test-rem +++ b/tests/test-rem @@ -133,6 +133,17 @@ REM 4 MSG Normal SET $DefaultColor "256 0 0" EOF +# Test stdout +../src/remind - 1 jan 2012 <<'EOF' >> ../tests/test.out 2>&1 +BANNER % +MSG STDOUT is a: [stdout()]% +EOF + +../src/remind - 1 jan 2012 <<'EOF' 2>&1 | cat >> ../tests/test.out +BANNER % +MSG STDOUT is a: [stdout()]% +EOF + # Test -@ option ../src/remind -w,0,0 -@0,,1 -c - 1 Jan 2020 <<'EOF' >> ../tests/test.out 2>&1 rem 1 SPECIAL COLOR 0 0 0 BLACK diff --git a/tests/test.cmp b/tests/test.cmp index 6d633d98..0e2a42fe 100644 --- a/tests/test.cmp +++ b/tests/test.cmp @@ -1341,1213 +1341,1215 @@ set a134 trigeventstart() trigeventstart() => 1991-02-13@16:00 set a135 trigeventduration() trigeventduration() => 72:00 +set a136 stdout() +stdout() => "FILE" # These will issue errors REM Mon OMIT Mon SKIP MSG Never ever ever... -../tests/test.rem(441): Can't compute trigger +../tests/test.rem(442): Can't compute trigger REM Mon SATISFY [wkdaynum($T) == 3] MSG Nope nope... -../tests/test.rem(442): Trig = Monday, 18 February, 1991 +../tests/test.rem(443): Trig = Monday, 18 February, 1991 $T => 1991-02-18 wkdaynum(1991-02-18) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 25 February, 1991 +../tests/test.rem(443): Trig = Monday, 25 February, 1991 $T => 1991-02-25 wkdaynum(1991-02-25) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 4 March, 1991 +../tests/test.rem(443): Trig = Monday, 4 March, 1991 $T => 1991-03-04 wkdaynum(1991-03-04) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 11 March, 1991 +../tests/test.rem(443): Trig = Monday, 11 March, 1991 $T => 1991-03-11 wkdaynum(1991-03-11) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 18 March, 1991 +../tests/test.rem(443): Trig = Monday, 18 March, 1991 $T => 1991-03-18 wkdaynum(1991-03-18) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 25 March, 1991 +../tests/test.rem(443): Trig = Monday, 25 March, 1991 $T => 1991-03-25 wkdaynum(1991-03-25) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 1 April, 1991 +../tests/test.rem(443): Trig = Monday, 1 April, 1991 $T => 1991-04-01 wkdaynum(1991-04-01) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 8 April, 1991 +../tests/test.rem(443): Trig = Monday, 8 April, 1991 $T => 1991-04-08 wkdaynum(1991-04-08) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 15 April, 1991 +../tests/test.rem(443): Trig = Monday, 15 April, 1991 $T => 1991-04-15 wkdaynum(1991-04-15) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 22 April, 1991 +../tests/test.rem(443): Trig = Monday, 22 April, 1991 $T => 1991-04-22 wkdaynum(1991-04-22) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 29 April, 1991 +../tests/test.rem(443): Trig = Monday, 29 April, 1991 $T => 1991-04-29 wkdaynum(1991-04-29) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 6 May, 1991 +../tests/test.rem(443): Trig = Monday, 6 May, 1991 $T => 1991-05-06 wkdaynum(1991-05-06) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 13 May, 1991 +../tests/test.rem(443): Trig = Monday, 13 May, 1991 $T => 1991-05-13 wkdaynum(1991-05-13) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 20 May, 1991 +../tests/test.rem(443): Trig = Monday, 20 May, 1991 $T => 1991-05-20 wkdaynum(1991-05-20) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 27 May, 1991 +../tests/test.rem(443): Trig = Monday, 27 May, 1991 $T => 1991-05-27 wkdaynum(1991-05-27) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 3 June, 1991 +../tests/test.rem(443): Trig = Monday, 3 June, 1991 $T => 1991-06-03 wkdaynum(1991-06-03) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 10 June, 1991 +../tests/test.rem(443): Trig = Monday, 10 June, 1991 $T => 1991-06-10 wkdaynum(1991-06-10) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 17 June, 1991 +../tests/test.rem(443): Trig = Monday, 17 June, 1991 $T => 1991-06-17 wkdaynum(1991-06-17) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 24 June, 1991 +../tests/test.rem(443): Trig = Monday, 24 June, 1991 $T => 1991-06-24 wkdaynum(1991-06-24) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 1 July, 1991 +../tests/test.rem(443): Trig = Monday, 1 July, 1991 $T => 1991-07-01 wkdaynum(1991-07-01) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 8 July, 1991 +../tests/test.rem(443): Trig = Monday, 8 July, 1991 $T => 1991-07-08 wkdaynum(1991-07-08) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 15 July, 1991 +../tests/test.rem(443): Trig = Monday, 15 July, 1991 $T => 1991-07-15 wkdaynum(1991-07-15) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 22 July, 1991 +../tests/test.rem(443): Trig = Monday, 22 July, 1991 $T => 1991-07-22 wkdaynum(1991-07-22) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 29 July, 1991 +../tests/test.rem(443): Trig = Monday, 29 July, 1991 $T => 1991-07-29 wkdaynum(1991-07-29) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 5 August, 1991 +../tests/test.rem(443): Trig = Monday, 5 August, 1991 $T => 1991-08-05 wkdaynum(1991-08-05) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 12 August, 1991 +../tests/test.rem(443): Trig = Monday, 12 August, 1991 $T => 1991-08-12 wkdaynum(1991-08-12) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 19 August, 1991 +../tests/test.rem(443): Trig = Monday, 19 August, 1991 $T => 1991-08-19 wkdaynum(1991-08-19) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 26 August, 1991 +../tests/test.rem(443): Trig = Monday, 26 August, 1991 $T => 1991-08-26 wkdaynum(1991-08-26) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 2 September, 1991 +../tests/test.rem(443): Trig = Monday, 2 September, 1991 $T => 1991-09-02 wkdaynum(1991-09-02) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 9 September, 1991 +../tests/test.rem(443): Trig = Monday, 9 September, 1991 $T => 1991-09-09 wkdaynum(1991-09-09) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 16 September, 1991 +../tests/test.rem(443): Trig = Monday, 16 September, 1991 $T => 1991-09-16 wkdaynum(1991-09-16) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 23 September, 1991 +../tests/test.rem(443): Trig = Monday, 23 September, 1991 $T => 1991-09-23 wkdaynum(1991-09-23) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 30 September, 1991 +../tests/test.rem(443): Trig = Monday, 30 September, 1991 $T => 1991-09-30 wkdaynum(1991-09-30) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 7 October, 1991 +../tests/test.rem(443): Trig = Monday, 7 October, 1991 $T => 1991-10-07 wkdaynum(1991-10-07) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 14 October, 1991 +../tests/test.rem(443): Trig = Monday, 14 October, 1991 $T => 1991-10-14 wkdaynum(1991-10-14) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 21 October, 1991 +../tests/test.rem(443): Trig = Monday, 21 October, 1991 $T => 1991-10-21 wkdaynum(1991-10-21) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 28 October, 1991 +../tests/test.rem(443): Trig = Monday, 28 October, 1991 $T => 1991-10-28 wkdaynum(1991-10-28) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 4 November, 1991 +../tests/test.rem(443): Trig = Monday, 4 November, 1991 $T => 1991-11-04 wkdaynum(1991-11-04) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 11 November, 1991 +../tests/test.rem(443): Trig = Monday, 11 November, 1991 $T => 1991-11-11 wkdaynum(1991-11-11) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 18 November, 1991 +../tests/test.rem(443): Trig = Monday, 18 November, 1991 $T => 1991-11-18 wkdaynum(1991-11-18) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 25 November, 1991 +../tests/test.rem(443): Trig = Monday, 25 November, 1991 $T => 1991-11-25 wkdaynum(1991-11-25) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 2 December, 1991 +../tests/test.rem(443): Trig = Monday, 2 December, 1991 $T => 1991-12-02 wkdaynum(1991-12-02) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 9 December, 1991 +../tests/test.rem(443): Trig = Monday, 9 December, 1991 $T => 1991-12-09 wkdaynum(1991-12-09) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 16 December, 1991 +../tests/test.rem(443): Trig = Monday, 16 December, 1991 $T => 1991-12-16 wkdaynum(1991-12-16) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 23 December, 1991 +../tests/test.rem(443): Trig = Monday, 23 December, 1991 $T => 1991-12-23 wkdaynum(1991-12-23) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 30 December, 1991 +../tests/test.rem(443): Trig = Monday, 30 December, 1991 $T => 1991-12-30 wkdaynum(1991-12-30) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 6 January, 1992 +../tests/test.rem(443): Trig = Monday, 6 January, 1992 $T => 1992-01-06 wkdaynum(1992-01-06) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 13 January, 1992 +../tests/test.rem(443): Trig = Monday, 13 January, 1992 $T => 1992-01-13 wkdaynum(1992-01-13) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 20 January, 1992 +../tests/test.rem(443): Trig = Monday, 20 January, 1992 $T => 1992-01-20 wkdaynum(1992-01-20) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 27 January, 1992 +../tests/test.rem(443): Trig = Monday, 27 January, 1992 $T => 1992-01-27 wkdaynum(1992-01-27) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 3 February, 1992 +../tests/test.rem(443): Trig = Monday, 3 February, 1992 $T => 1992-02-03 wkdaynum(1992-02-03) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 10 February, 1992 +../tests/test.rem(443): Trig = Monday, 10 February, 1992 $T => 1992-02-10 wkdaynum(1992-02-10) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 17 February, 1992 +../tests/test.rem(443): Trig = Monday, 17 February, 1992 $T => 1992-02-17 wkdaynum(1992-02-17) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 24 February, 1992 +../tests/test.rem(443): Trig = Monday, 24 February, 1992 $T => 1992-02-24 wkdaynum(1992-02-24) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 2 March, 1992 +../tests/test.rem(443): Trig = Monday, 2 March, 1992 $T => 1992-03-02 wkdaynum(1992-03-02) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 9 March, 1992 +../tests/test.rem(443): Trig = Monday, 9 March, 1992 $T => 1992-03-09 wkdaynum(1992-03-09) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 16 March, 1992 +../tests/test.rem(443): Trig = Monday, 16 March, 1992 $T => 1992-03-16 wkdaynum(1992-03-16) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 23 March, 1992 +../tests/test.rem(443): Trig = Monday, 23 March, 1992 $T => 1992-03-23 wkdaynum(1992-03-23) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 30 March, 1992 +../tests/test.rem(443): Trig = Monday, 30 March, 1992 $T => 1992-03-30 wkdaynum(1992-03-30) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 6 April, 1992 +../tests/test.rem(443): Trig = Monday, 6 April, 1992 $T => 1992-04-06 wkdaynum(1992-04-06) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 13 April, 1992 +../tests/test.rem(443): Trig = Monday, 13 April, 1992 $T => 1992-04-13 wkdaynum(1992-04-13) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 20 April, 1992 +../tests/test.rem(443): Trig = Monday, 20 April, 1992 $T => 1992-04-20 wkdaynum(1992-04-20) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 27 April, 1992 +../tests/test.rem(443): Trig = Monday, 27 April, 1992 $T => 1992-04-27 wkdaynum(1992-04-27) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 4 May, 1992 +../tests/test.rem(443): Trig = Monday, 4 May, 1992 $T => 1992-05-04 wkdaynum(1992-05-04) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 11 May, 1992 +../tests/test.rem(443): Trig = Monday, 11 May, 1992 $T => 1992-05-11 wkdaynum(1992-05-11) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 18 May, 1992 +../tests/test.rem(443): Trig = Monday, 18 May, 1992 $T => 1992-05-18 wkdaynum(1992-05-18) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 25 May, 1992 +../tests/test.rem(443): Trig = Monday, 25 May, 1992 $T => 1992-05-25 wkdaynum(1992-05-25) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 1 June, 1992 +../tests/test.rem(443): Trig = Monday, 1 June, 1992 $T => 1992-06-01 wkdaynum(1992-06-01) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 8 June, 1992 +../tests/test.rem(443): Trig = Monday, 8 June, 1992 $T => 1992-06-08 wkdaynum(1992-06-08) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 15 June, 1992 +../tests/test.rem(443): Trig = Monday, 15 June, 1992 $T => 1992-06-15 wkdaynum(1992-06-15) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 22 June, 1992 +../tests/test.rem(443): Trig = Monday, 22 June, 1992 $T => 1992-06-22 wkdaynum(1992-06-22) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 29 June, 1992 +../tests/test.rem(443): Trig = Monday, 29 June, 1992 $T => 1992-06-29 wkdaynum(1992-06-29) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 6 July, 1992 +../tests/test.rem(443): Trig = Monday, 6 July, 1992 $T => 1992-07-06 wkdaynum(1992-07-06) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 13 July, 1992 +../tests/test.rem(443): Trig = Monday, 13 July, 1992 $T => 1992-07-13 wkdaynum(1992-07-13) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 20 July, 1992 +../tests/test.rem(443): Trig = Monday, 20 July, 1992 $T => 1992-07-20 wkdaynum(1992-07-20) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 27 July, 1992 +../tests/test.rem(443): Trig = Monday, 27 July, 1992 $T => 1992-07-27 wkdaynum(1992-07-27) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 3 August, 1992 +../tests/test.rem(443): Trig = Monday, 3 August, 1992 $T => 1992-08-03 wkdaynum(1992-08-03) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 10 August, 1992 +../tests/test.rem(443): Trig = Monday, 10 August, 1992 $T => 1992-08-10 wkdaynum(1992-08-10) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 17 August, 1992 +../tests/test.rem(443): Trig = Monday, 17 August, 1992 $T => 1992-08-17 wkdaynum(1992-08-17) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 24 August, 1992 +../tests/test.rem(443): Trig = Monday, 24 August, 1992 $T => 1992-08-24 wkdaynum(1992-08-24) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 31 August, 1992 +../tests/test.rem(443): Trig = Monday, 31 August, 1992 $T => 1992-08-31 wkdaynum(1992-08-31) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 7 September, 1992 +../tests/test.rem(443): Trig = Monday, 7 September, 1992 $T => 1992-09-07 wkdaynum(1992-09-07) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 14 September, 1992 +../tests/test.rem(443): Trig = Monday, 14 September, 1992 $T => 1992-09-14 wkdaynum(1992-09-14) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 21 September, 1992 +../tests/test.rem(443): Trig = Monday, 21 September, 1992 $T => 1992-09-21 wkdaynum(1992-09-21) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 28 September, 1992 +../tests/test.rem(443): Trig = Monday, 28 September, 1992 $T => 1992-09-28 wkdaynum(1992-09-28) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 5 October, 1992 +../tests/test.rem(443): Trig = Monday, 5 October, 1992 $T => 1992-10-05 wkdaynum(1992-10-05) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 12 October, 1992 +../tests/test.rem(443): Trig = Monday, 12 October, 1992 $T => 1992-10-12 wkdaynum(1992-10-12) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 19 October, 1992 +../tests/test.rem(443): Trig = Monday, 19 October, 1992 $T => 1992-10-19 wkdaynum(1992-10-19) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 26 October, 1992 +../tests/test.rem(443): Trig = Monday, 26 October, 1992 $T => 1992-10-26 wkdaynum(1992-10-26) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 2 November, 1992 +../tests/test.rem(443): Trig = Monday, 2 November, 1992 $T => 1992-11-02 wkdaynum(1992-11-02) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 9 November, 1992 +../tests/test.rem(443): Trig = Monday, 9 November, 1992 $T => 1992-11-09 wkdaynum(1992-11-09) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 16 November, 1992 +../tests/test.rem(443): Trig = Monday, 16 November, 1992 $T => 1992-11-16 wkdaynum(1992-11-16) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 23 November, 1992 +../tests/test.rem(443): Trig = Monday, 23 November, 1992 $T => 1992-11-23 wkdaynum(1992-11-23) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 30 November, 1992 +../tests/test.rem(443): Trig = Monday, 30 November, 1992 $T => 1992-11-30 wkdaynum(1992-11-30) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 7 December, 1992 +../tests/test.rem(443): Trig = Monday, 7 December, 1992 $T => 1992-12-07 wkdaynum(1992-12-07) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 14 December, 1992 +../tests/test.rem(443): Trig = Monday, 14 December, 1992 $T => 1992-12-14 wkdaynum(1992-12-14) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 21 December, 1992 +../tests/test.rem(443): Trig = Monday, 21 December, 1992 $T => 1992-12-21 wkdaynum(1992-12-21) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 28 December, 1992 +../tests/test.rem(443): Trig = Monday, 28 December, 1992 $T => 1992-12-28 wkdaynum(1992-12-28) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 4 January, 1993 +../tests/test.rem(443): Trig = Monday, 4 January, 1993 $T => 1993-01-04 wkdaynum(1993-01-04) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 11 January, 1993 +../tests/test.rem(443): Trig = Monday, 11 January, 1993 $T => 1993-01-11 wkdaynum(1993-01-11) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 18 January, 1993 +../tests/test.rem(443): Trig = Monday, 18 January, 1993 $T => 1993-01-18 wkdaynum(1993-01-18) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 25 January, 1993 +../tests/test.rem(443): Trig = Monday, 25 January, 1993 $T => 1993-01-25 wkdaynum(1993-01-25) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 1 February, 1993 +../tests/test.rem(443): Trig = Monday, 1 February, 1993 $T => 1993-02-01 wkdaynum(1993-02-01) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 8 February, 1993 +../tests/test.rem(443): Trig = Monday, 8 February, 1993 $T => 1993-02-08 wkdaynum(1993-02-08) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 15 February, 1993 +../tests/test.rem(443): Trig = Monday, 15 February, 1993 $T => 1993-02-15 wkdaynum(1993-02-15) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 22 February, 1993 +../tests/test.rem(443): Trig = Monday, 22 February, 1993 $T => 1993-02-22 wkdaynum(1993-02-22) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 1 March, 1993 +../tests/test.rem(443): Trig = Monday, 1 March, 1993 $T => 1993-03-01 wkdaynum(1993-03-01) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 8 March, 1993 +../tests/test.rem(443): Trig = Monday, 8 March, 1993 $T => 1993-03-08 wkdaynum(1993-03-08) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 15 March, 1993 +../tests/test.rem(443): Trig = Monday, 15 March, 1993 $T => 1993-03-15 wkdaynum(1993-03-15) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 22 March, 1993 +../tests/test.rem(443): Trig = Monday, 22 March, 1993 $T => 1993-03-22 wkdaynum(1993-03-22) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 29 March, 1993 +../tests/test.rem(443): Trig = Monday, 29 March, 1993 $T => 1993-03-29 wkdaynum(1993-03-29) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 5 April, 1993 +../tests/test.rem(443): Trig = Monday, 5 April, 1993 $T => 1993-04-05 wkdaynum(1993-04-05) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 12 April, 1993 +../tests/test.rem(443): Trig = Monday, 12 April, 1993 $T => 1993-04-12 wkdaynum(1993-04-12) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 19 April, 1993 +../tests/test.rem(443): Trig = Monday, 19 April, 1993 $T => 1993-04-19 wkdaynum(1993-04-19) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 26 April, 1993 +../tests/test.rem(443): Trig = Monday, 26 April, 1993 $T => 1993-04-26 wkdaynum(1993-04-26) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 3 May, 1993 +../tests/test.rem(443): Trig = Monday, 3 May, 1993 $T => 1993-05-03 wkdaynum(1993-05-03) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 10 May, 1993 +../tests/test.rem(443): Trig = Monday, 10 May, 1993 $T => 1993-05-10 wkdaynum(1993-05-10) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 17 May, 1993 +../tests/test.rem(443): Trig = Monday, 17 May, 1993 $T => 1993-05-17 wkdaynum(1993-05-17) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 24 May, 1993 +../tests/test.rem(443): Trig = Monday, 24 May, 1993 $T => 1993-05-24 wkdaynum(1993-05-24) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 31 May, 1993 +../tests/test.rem(443): Trig = Monday, 31 May, 1993 $T => 1993-05-31 wkdaynum(1993-05-31) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 7 June, 1993 +../tests/test.rem(443): Trig = Monday, 7 June, 1993 $T => 1993-06-07 wkdaynum(1993-06-07) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 14 June, 1993 +../tests/test.rem(443): Trig = Monday, 14 June, 1993 $T => 1993-06-14 wkdaynum(1993-06-14) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 21 June, 1993 +../tests/test.rem(443): Trig = Monday, 21 June, 1993 $T => 1993-06-21 wkdaynum(1993-06-21) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 28 June, 1993 +../tests/test.rem(443): Trig = Monday, 28 June, 1993 $T => 1993-06-28 wkdaynum(1993-06-28) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 5 July, 1993 +../tests/test.rem(443): Trig = Monday, 5 July, 1993 $T => 1993-07-05 wkdaynum(1993-07-05) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 12 July, 1993 +../tests/test.rem(443): Trig = Monday, 12 July, 1993 $T => 1993-07-12 wkdaynum(1993-07-12) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 19 July, 1993 +../tests/test.rem(443): Trig = Monday, 19 July, 1993 $T => 1993-07-19 wkdaynum(1993-07-19) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 26 July, 1993 +../tests/test.rem(443): Trig = Monday, 26 July, 1993 $T => 1993-07-26 wkdaynum(1993-07-26) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 2 August, 1993 +../tests/test.rem(443): Trig = Monday, 2 August, 1993 $T => 1993-08-02 wkdaynum(1993-08-02) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 9 August, 1993 +../tests/test.rem(443): Trig = Monday, 9 August, 1993 $T => 1993-08-09 wkdaynum(1993-08-09) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 16 August, 1993 +../tests/test.rem(443): Trig = Monday, 16 August, 1993 $T => 1993-08-16 wkdaynum(1993-08-16) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 23 August, 1993 +../tests/test.rem(443): Trig = Monday, 23 August, 1993 $T => 1993-08-23 wkdaynum(1993-08-23) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 30 August, 1993 +../tests/test.rem(443): Trig = Monday, 30 August, 1993 $T => 1993-08-30 wkdaynum(1993-08-30) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 6 September, 1993 +../tests/test.rem(443): Trig = Monday, 6 September, 1993 $T => 1993-09-06 wkdaynum(1993-09-06) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 13 September, 1993 +../tests/test.rem(443): Trig = Monday, 13 September, 1993 $T => 1993-09-13 wkdaynum(1993-09-13) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 20 September, 1993 +../tests/test.rem(443): Trig = Monday, 20 September, 1993 $T => 1993-09-20 wkdaynum(1993-09-20) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 27 September, 1993 +../tests/test.rem(443): Trig = Monday, 27 September, 1993 $T => 1993-09-27 wkdaynum(1993-09-27) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 4 October, 1993 +../tests/test.rem(443): Trig = Monday, 4 October, 1993 $T => 1993-10-04 wkdaynum(1993-10-04) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 11 October, 1993 +../tests/test.rem(443): Trig = Monday, 11 October, 1993 $T => 1993-10-11 wkdaynum(1993-10-11) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 18 October, 1993 +../tests/test.rem(443): Trig = Monday, 18 October, 1993 $T => 1993-10-18 wkdaynum(1993-10-18) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 25 October, 1993 +../tests/test.rem(443): Trig = Monday, 25 October, 1993 $T => 1993-10-25 wkdaynum(1993-10-25) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 1 November, 1993 +../tests/test.rem(443): Trig = Monday, 1 November, 1993 $T => 1993-11-01 wkdaynum(1993-11-01) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 8 November, 1993 +../tests/test.rem(443): Trig = Monday, 8 November, 1993 $T => 1993-11-08 wkdaynum(1993-11-08) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 15 November, 1993 +../tests/test.rem(443): Trig = Monday, 15 November, 1993 $T => 1993-11-15 wkdaynum(1993-11-15) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 22 November, 1993 +../tests/test.rem(443): Trig = Monday, 22 November, 1993 $T => 1993-11-22 wkdaynum(1993-11-22) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 29 November, 1993 +../tests/test.rem(443): Trig = Monday, 29 November, 1993 $T => 1993-11-29 wkdaynum(1993-11-29) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 6 December, 1993 +../tests/test.rem(443): Trig = Monday, 6 December, 1993 $T => 1993-12-06 wkdaynum(1993-12-06) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 13 December, 1993 +../tests/test.rem(443): Trig = Monday, 13 December, 1993 $T => 1993-12-13 wkdaynum(1993-12-13) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 20 December, 1993 +../tests/test.rem(443): Trig = Monday, 20 December, 1993 $T => 1993-12-20 wkdaynum(1993-12-20) => 1 1 == 3 => 0 -../tests/test.rem(442): Trig = Monday, 27 December, 1993 +../tests/test.rem(443): Trig = Monday, 27 December, 1993 $T => 1993-12-27 wkdaynum(1993-12-27) => 1 1 == 3 => 0 -../tests/test.rem(442): Can't compute trigger +../tests/test.rem(443): Can't compute trigger # These will just silently not trigger REM MAYBE-UNCOMPUTABLE Mon OMIT Mon SKIP MSG Never ever ever... REM MAYBE-UNCOMPUTABLE Mon SATISFY [wkdaynum($T) == 3] MSG Nope nope... -../tests/test.rem(446): Trig = Monday, 18 February, 1991 +../tests/test.rem(447): Trig = Monday, 18 February, 1991 $T => 1991-02-18 wkdaynum(1991-02-18) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 25 February, 1991 +../tests/test.rem(447): Trig = Monday, 25 February, 1991 $T => 1991-02-25 wkdaynum(1991-02-25) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 4 March, 1991 +../tests/test.rem(447): Trig = Monday, 4 March, 1991 $T => 1991-03-04 wkdaynum(1991-03-04) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 11 March, 1991 +../tests/test.rem(447): Trig = Monday, 11 March, 1991 $T => 1991-03-11 wkdaynum(1991-03-11) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 18 March, 1991 +../tests/test.rem(447): Trig = Monday, 18 March, 1991 $T => 1991-03-18 wkdaynum(1991-03-18) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 25 March, 1991 +../tests/test.rem(447): Trig = Monday, 25 March, 1991 $T => 1991-03-25 wkdaynum(1991-03-25) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 1 April, 1991 +../tests/test.rem(447): Trig = Monday, 1 April, 1991 $T => 1991-04-01 wkdaynum(1991-04-01) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 8 April, 1991 +../tests/test.rem(447): Trig = Monday, 8 April, 1991 $T => 1991-04-08 wkdaynum(1991-04-08) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 15 April, 1991 +../tests/test.rem(447): Trig = Monday, 15 April, 1991 $T => 1991-04-15 wkdaynum(1991-04-15) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 22 April, 1991 +../tests/test.rem(447): Trig = Monday, 22 April, 1991 $T => 1991-04-22 wkdaynum(1991-04-22) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 29 April, 1991 +../tests/test.rem(447): Trig = Monday, 29 April, 1991 $T => 1991-04-29 wkdaynum(1991-04-29) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 6 May, 1991 +../tests/test.rem(447): Trig = Monday, 6 May, 1991 $T => 1991-05-06 wkdaynum(1991-05-06) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 13 May, 1991 +../tests/test.rem(447): Trig = Monday, 13 May, 1991 $T => 1991-05-13 wkdaynum(1991-05-13) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 20 May, 1991 +../tests/test.rem(447): Trig = Monday, 20 May, 1991 $T => 1991-05-20 wkdaynum(1991-05-20) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 27 May, 1991 +../tests/test.rem(447): Trig = Monday, 27 May, 1991 $T => 1991-05-27 wkdaynum(1991-05-27) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 3 June, 1991 +../tests/test.rem(447): Trig = Monday, 3 June, 1991 $T => 1991-06-03 wkdaynum(1991-06-03) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 10 June, 1991 +../tests/test.rem(447): Trig = Monday, 10 June, 1991 $T => 1991-06-10 wkdaynum(1991-06-10) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 17 June, 1991 +../tests/test.rem(447): Trig = Monday, 17 June, 1991 $T => 1991-06-17 wkdaynum(1991-06-17) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 24 June, 1991 +../tests/test.rem(447): Trig = Monday, 24 June, 1991 $T => 1991-06-24 wkdaynum(1991-06-24) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 1 July, 1991 +../tests/test.rem(447): Trig = Monday, 1 July, 1991 $T => 1991-07-01 wkdaynum(1991-07-01) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 8 July, 1991 +../tests/test.rem(447): Trig = Monday, 8 July, 1991 $T => 1991-07-08 wkdaynum(1991-07-08) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 15 July, 1991 +../tests/test.rem(447): Trig = Monday, 15 July, 1991 $T => 1991-07-15 wkdaynum(1991-07-15) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 22 July, 1991 +../tests/test.rem(447): Trig = Monday, 22 July, 1991 $T => 1991-07-22 wkdaynum(1991-07-22) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 29 July, 1991 +../tests/test.rem(447): Trig = Monday, 29 July, 1991 $T => 1991-07-29 wkdaynum(1991-07-29) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 5 August, 1991 +../tests/test.rem(447): Trig = Monday, 5 August, 1991 $T => 1991-08-05 wkdaynum(1991-08-05) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 12 August, 1991 +../tests/test.rem(447): Trig = Monday, 12 August, 1991 $T => 1991-08-12 wkdaynum(1991-08-12) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 19 August, 1991 +../tests/test.rem(447): Trig = Monday, 19 August, 1991 $T => 1991-08-19 wkdaynum(1991-08-19) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 26 August, 1991 +../tests/test.rem(447): Trig = Monday, 26 August, 1991 $T => 1991-08-26 wkdaynum(1991-08-26) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 2 September, 1991 +../tests/test.rem(447): Trig = Monday, 2 September, 1991 $T => 1991-09-02 wkdaynum(1991-09-02) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 9 September, 1991 +../tests/test.rem(447): Trig = Monday, 9 September, 1991 $T => 1991-09-09 wkdaynum(1991-09-09) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 16 September, 1991 +../tests/test.rem(447): Trig = Monday, 16 September, 1991 $T => 1991-09-16 wkdaynum(1991-09-16) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 23 September, 1991 +../tests/test.rem(447): Trig = Monday, 23 September, 1991 $T => 1991-09-23 wkdaynum(1991-09-23) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 30 September, 1991 +../tests/test.rem(447): Trig = Monday, 30 September, 1991 $T => 1991-09-30 wkdaynum(1991-09-30) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 7 October, 1991 +../tests/test.rem(447): Trig = Monday, 7 October, 1991 $T => 1991-10-07 wkdaynum(1991-10-07) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 14 October, 1991 +../tests/test.rem(447): Trig = Monday, 14 October, 1991 $T => 1991-10-14 wkdaynum(1991-10-14) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 21 October, 1991 +../tests/test.rem(447): Trig = Monday, 21 October, 1991 $T => 1991-10-21 wkdaynum(1991-10-21) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 28 October, 1991 +../tests/test.rem(447): Trig = Monday, 28 October, 1991 $T => 1991-10-28 wkdaynum(1991-10-28) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 4 November, 1991 +../tests/test.rem(447): Trig = Monday, 4 November, 1991 $T => 1991-11-04 wkdaynum(1991-11-04) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 11 November, 1991 +../tests/test.rem(447): Trig = Monday, 11 November, 1991 $T => 1991-11-11 wkdaynum(1991-11-11) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 18 November, 1991 +../tests/test.rem(447): Trig = Monday, 18 November, 1991 $T => 1991-11-18 wkdaynum(1991-11-18) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 25 November, 1991 +../tests/test.rem(447): Trig = Monday, 25 November, 1991 $T => 1991-11-25 wkdaynum(1991-11-25) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 2 December, 1991 +../tests/test.rem(447): Trig = Monday, 2 December, 1991 $T => 1991-12-02 wkdaynum(1991-12-02) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 9 December, 1991 +../tests/test.rem(447): Trig = Monday, 9 December, 1991 $T => 1991-12-09 wkdaynum(1991-12-09) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 16 December, 1991 +../tests/test.rem(447): Trig = Monday, 16 December, 1991 $T => 1991-12-16 wkdaynum(1991-12-16) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 23 December, 1991 +../tests/test.rem(447): Trig = Monday, 23 December, 1991 $T => 1991-12-23 wkdaynum(1991-12-23) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 30 December, 1991 +../tests/test.rem(447): Trig = Monday, 30 December, 1991 $T => 1991-12-30 wkdaynum(1991-12-30) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 6 January, 1992 +../tests/test.rem(447): Trig = Monday, 6 January, 1992 $T => 1992-01-06 wkdaynum(1992-01-06) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 13 January, 1992 +../tests/test.rem(447): Trig = Monday, 13 January, 1992 $T => 1992-01-13 wkdaynum(1992-01-13) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 20 January, 1992 +../tests/test.rem(447): Trig = Monday, 20 January, 1992 $T => 1992-01-20 wkdaynum(1992-01-20) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 27 January, 1992 +../tests/test.rem(447): Trig = Monday, 27 January, 1992 $T => 1992-01-27 wkdaynum(1992-01-27) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 3 February, 1992 +../tests/test.rem(447): Trig = Monday, 3 February, 1992 $T => 1992-02-03 wkdaynum(1992-02-03) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 10 February, 1992 +../tests/test.rem(447): Trig = Monday, 10 February, 1992 $T => 1992-02-10 wkdaynum(1992-02-10) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 17 February, 1992 +../tests/test.rem(447): Trig = Monday, 17 February, 1992 $T => 1992-02-17 wkdaynum(1992-02-17) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 24 February, 1992 +../tests/test.rem(447): Trig = Monday, 24 February, 1992 $T => 1992-02-24 wkdaynum(1992-02-24) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 2 March, 1992 +../tests/test.rem(447): Trig = Monday, 2 March, 1992 $T => 1992-03-02 wkdaynum(1992-03-02) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 9 March, 1992 +../tests/test.rem(447): Trig = Monday, 9 March, 1992 $T => 1992-03-09 wkdaynum(1992-03-09) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 16 March, 1992 +../tests/test.rem(447): Trig = Monday, 16 March, 1992 $T => 1992-03-16 wkdaynum(1992-03-16) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 23 March, 1992 +../tests/test.rem(447): Trig = Monday, 23 March, 1992 $T => 1992-03-23 wkdaynum(1992-03-23) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 30 March, 1992 +../tests/test.rem(447): Trig = Monday, 30 March, 1992 $T => 1992-03-30 wkdaynum(1992-03-30) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 6 April, 1992 +../tests/test.rem(447): Trig = Monday, 6 April, 1992 $T => 1992-04-06 wkdaynum(1992-04-06) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 13 April, 1992 +../tests/test.rem(447): Trig = Monday, 13 April, 1992 $T => 1992-04-13 wkdaynum(1992-04-13) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 20 April, 1992 +../tests/test.rem(447): Trig = Monday, 20 April, 1992 $T => 1992-04-20 wkdaynum(1992-04-20) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 27 April, 1992 +../tests/test.rem(447): Trig = Monday, 27 April, 1992 $T => 1992-04-27 wkdaynum(1992-04-27) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 4 May, 1992 +../tests/test.rem(447): Trig = Monday, 4 May, 1992 $T => 1992-05-04 wkdaynum(1992-05-04) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 11 May, 1992 +../tests/test.rem(447): Trig = Monday, 11 May, 1992 $T => 1992-05-11 wkdaynum(1992-05-11) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 18 May, 1992 +../tests/test.rem(447): Trig = Monday, 18 May, 1992 $T => 1992-05-18 wkdaynum(1992-05-18) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 25 May, 1992 +../tests/test.rem(447): Trig = Monday, 25 May, 1992 $T => 1992-05-25 wkdaynum(1992-05-25) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 1 June, 1992 +../tests/test.rem(447): Trig = Monday, 1 June, 1992 $T => 1992-06-01 wkdaynum(1992-06-01) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 8 June, 1992 +../tests/test.rem(447): Trig = Monday, 8 June, 1992 $T => 1992-06-08 wkdaynum(1992-06-08) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 15 June, 1992 +../tests/test.rem(447): Trig = Monday, 15 June, 1992 $T => 1992-06-15 wkdaynum(1992-06-15) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 22 June, 1992 +../tests/test.rem(447): Trig = Monday, 22 June, 1992 $T => 1992-06-22 wkdaynum(1992-06-22) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 29 June, 1992 +../tests/test.rem(447): Trig = Monday, 29 June, 1992 $T => 1992-06-29 wkdaynum(1992-06-29) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 6 July, 1992 +../tests/test.rem(447): Trig = Monday, 6 July, 1992 $T => 1992-07-06 wkdaynum(1992-07-06) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 13 July, 1992 +../tests/test.rem(447): Trig = Monday, 13 July, 1992 $T => 1992-07-13 wkdaynum(1992-07-13) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 20 July, 1992 +../tests/test.rem(447): Trig = Monday, 20 July, 1992 $T => 1992-07-20 wkdaynum(1992-07-20) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 27 July, 1992 +../tests/test.rem(447): Trig = Monday, 27 July, 1992 $T => 1992-07-27 wkdaynum(1992-07-27) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 3 August, 1992 +../tests/test.rem(447): Trig = Monday, 3 August, 1992 $T => 1992-08-03 wkdaynum(1992-08-03) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 10 August, 1992 +../tests/test.rem(447): Trig = Monday, 10 August, 1992 $T => 1992-08-10 wkdaynum(1992-08-10) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 17 August, 1992 +../tests/test.rem(447): Trig = Monday, 17 August, 1992 $T => 1992-08-17 wkdaynum(1992-08-17) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 24 August, 1992 +../tests/test.rem(447): Trig = Monday, 24 August, 1992 $T => 1992-08-24 wkdaynum(1992-08-24) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 31 August, 1992 +../tests/test.rem(447): Trig = Monday, 31 August, 1992 $T => 1992-08-31 wkdaynum(1992-08-31) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 7 September, 1992 +../tests/test.rem(447): Trig = Monday, 7 September, 1992 $T => 1992-09-07 wkdaynum(1992-09-07) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 14 September, 1992 +../tests/test.rem(447): Trig = Monday, 14 September, 1992 $T => 1992-09-14 wkdaynum(1992-09-14) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 21 September, 1992 +../tests/test.rem(447): Trig = Monday, 21 September, 1992 $T => 1992-09-21 wkdaynum(1992-09-21) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 28 September, 1992 +../tests/test.rem(447): Trig = Monday, 28 September, 1992 $T => 1992-09-28 wkdaynum(1992-09-28) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 5 October, 1992 +../tests/test.rem(447): Trig = Monday, 5 October, 1992 $T => 1992-10-05 wkdaynum(1992-10-05) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 12 October, 1992 +../tests/test.rem(447): Trig = Monday, 12 October, 1992 $T => 1992-10-12 wkdaynum(1992-10-12) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 19 October, 1992 +../tests/test.rem(447): Trig = Monday, 19 October, 1992 $T => 1992-10-19 wkdaynum(1992-10-19) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 26 October, 1992 +../tests/test.rem(447): Trig = Monday, 26 October, 1992 $T => 1992-10-26 wkdaynum(1992-10-26) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 2 November, 1992 +../tests/test.rem(447): Trig = Monday, 2 November, 1992 $T => 1992-11-02 wkdaynum(1992-11-02) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 9 November, 1992 +../tests/test.rem(447): Trig = Monday, 9 November, 1992 $T => 1992-11-09 wkdaynum(1992-11-09) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 16 November, 1992 +../tests/test.rem(447): Trig = Monday, 16 November, 1992 $T => 1992-11-16 wkdaynum(1992-11-16) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 23 November, 1992 +../tests/test.rem(447): Trig = Monday, 23 November, 1992 $T => 1992-11-23 wkdaynum(1992-11-23) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 30 November, 1992 +../tests/test.rem(447): Trig = Monday, 30 November, 1992 $T => 1992-11-30 wkdaynum(1992-11-30) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 7 December, 1992 +../tests/test.rem(447): Trig = Monday, 7 December, 1992 $T => 1992-12-07 wkdaynum(1992-12-07) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 14 December, 1992 +../tests/test.rem(447): Trig = Monday, 14 December, 1992 $T => 1992-12-14 wkdaynum(1992-12-14) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 21 December, 1992 +../tests/test.rem(447): Trig = Monday, 21 December, 1992 $T => 1992-12-21 wkdaynum(1992-12-21) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 28 December, 1992 +../tests/test.rem(447): Trig = Monday, 28 December, 1992 $T => 1992-12-28 wkdaynum(1992-12-28) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 4 January, 1993 +../tests/test.rem(447): Trig = Monday, 4 January, 1993 $T => 1993-01-04 wkdaynum(1993-01-04) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 11 January, 1993 +../tests/test.rem(447): Trig = Monday, 11 January, 1993 $T => 1993-01-11 wkdaynum(1993-01-11) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 18 January, 1993 +../tests/test.rem(447): Trig = Monday, 18 January, 1993 $T => 1993-01-18 wkdaynum(1993-01-18) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 25 January, 1993 +../tests/test.rem(447): Trig = Monday, 25 January, 1993 $T => 1993-01-25 wkdaynum(1993-01-25) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 1 February, 1993 +../tests/test.rem(447): Trig = Monday, 1 February, 1993 $T => 1993-02-01 wkdaynum(1993-02-01) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 8 February, 1993 +../tests/test.rem(447): Trig = Monday, 8 February, 1993 $T => 1993-02-08 wkdaynum(1993-02-08) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 15 February, 1993 +../tests/test.rem(447): Trig = Monday, 15 February, 1993 $T => 1993-02-15 wkdaynum(1993-02-15) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 22 February, 1993 +../tests/test.rem(447): Trig = Monday, 22 February, 1993 $T => 1993-02-22 wkdaynum(1993-02-22) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 1 March, 1993 +../tests/test.rem(447): Trig = Monday, 1 March, 1993 $T => 1993-03-01 wkdaynum(1993-03-01) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 8 March, 1993 +../tests/test.rem(447): Trig = Monday, 8 March, 1993 $T => 1993-03-08 wkdaynum(1993-03-08) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 15 March, 1993 +../tests/test.rem(447): Trig = Monday, 15 March, 1993 $T => 1993-03-15 wkdaynum(1993-03-15) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 22 March, 1993 +../tests/test.rem(447): Trig = Monday, 22 March, 1993 $T => 1993-03-22 wkdaynum(1993-03-22) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 29 March, 1993 +../tests/test.rem(447): Trig = Monday, 29 March, 1993 $T => 1993-03-29 wkdaynum(1993-03-29) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 5 April, 1993 +../tests/test.rem(447): Trig = Monday, 5 April, 1993 $T => 1993-04-05 wkdaynum(1993-04-05) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 12 April, 1993 +../tests/test.rem(447): Trig = Monday, 12 April, 1993 $T => 1993-04-12 wkdaynum(1993-04-12) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 19 April, 1993 +../tests/test.rem(447): Trig = Monday, 19 April, 1993 $T => 1993-04-19 wkdaynum(1993-04-19) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 26 April, 1993 +../tests/test.rem(447): Trig = Monday, 26 April, 1993 $T => 1993-04-26 wkdaynum(1993-04-26) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 3 May, 1993 +../tests/test.rem(447): Trig = Monday, 3 May, 1993 $T => 1993-05-03 wkdaynum(1993-05-03) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 10 May, 1993 +../tests/test.rem(447): Trig = Monday, 10 May, 1993 $T => 1993-05-10 wkdaynum(1993-05-10) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 17 May, 1993 +../tests/test.rem(447): Trig = Monday, 17 May, 1993 $T => 1993-05-17 wkdaynum(1993-05-17) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 24 May, 1993 +../tests/test.rem(447): Trig = Monday, 24 May, 1993 $T => 1993-05-24 wkdaynum(1993-05-24) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 31 May, 1993 +../tests/test.rem(447): Trig = Monday, 31 May, 1993 $T => 1993-05-31 wkdaynum(1993-05-31) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 7 June, 1993 +../tests/test.rem(447): Trig = Monday, 7 June, 1993 $T => 1993-06-07 wkdaynum(1993-06-07) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 14 June, 1993 +../tests/test.rem(447): Trig = Monday, 14 June, 1993 $T => 1993-06-14 wkdaynum(1993-06-14) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 21 June, 1993 +../tests/test.rem(447): Trig = Monday, 21 June, 1993 $T => 1993-06-21 wkdaynum(1993-06-21) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 28 June, 1993 +../tests/test.rem(447): Trig = Monday, 28 June, 1993 $T => 1993-06-28 wkdaynum(1993-06-28) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 5 July, 1993 +../tests/test.rem(447): Trig = Monday, 5 July, 1993 $T => 1993-07-05 wkdaynum(1993-07-05) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 12 July, 1993 +../tests/test.rem(447): Trig = Monday, 12 July, 1993 $T => 1993-07-12 wkdaynum(1993-07-12) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 19 July, 1993 +../tests/test.rem(447): Trig = Monday, 19 July, 1993 $T => 1993-07-19 wkdaynum(1993-07-19) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 26 July, 1993 +../tests/test.rem(447): Trig = Monday, 26 July, 1993 $T => 1993-07-26 wkdaynum(1993-07-26) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 2 August, 1993 +../tests/test.rem(447): Trig = Monday, 2 August, 1993 $T => 1993-08-02 wkdaynum(1993-08-02) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 9 August, 1993 +../tests/test.rem(447): Trig = Monday, 9 August, 1993 $T => 1993-08-09 wkdaynum(1993-08-09) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 16 August, 1993 +../tests/test.rem(447): Trig = Monday, 16 August, 1993 $T => 1993-08-16 wkdaynum(1993-08-16) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 23 August, 1993 +../tests/test.rem(447): Trig = Monday, 23 August, 1993 $T => 1993-08-23 wkdaynum(1993-08-23) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 30 August, 1993 +../tests/test.rem(447): Trig = Monday, 30 August, 1993 $T => 1993-08-30 wkdaynum(1993-08-30) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 6 September, 1993 +../tests/test.rem(447): Trig = Monday, 6 September, 1993 $T => 1993-09-06 wkdaynum(1993-09-06) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 13 September, 1993 +../tests/test.rem(447): Trig = Monday, 13 September, 1993 $T => 1993-09-13 wkdaynum(1993-09-13) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 20 September, 1993 +../tests/test.rem(447): Trig = Monday, 20 September, 1993 $T => 1993-09-20 wkdaynum(1993-09-20) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 27 September, 1993 +../tests/test.rem(447): Trig = Monday, 27 September, 1993 $T => 1993-09-27 wkdaynum(1993-09-27) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 4 October, 1993 +../tests/test.rem(447): Trig = Monday, 4 October, 1993 $T => 1993-10-04 wkdaynum(1993-10-04) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 11 October, 1993 +../tests/test.rem(447): Trig = Monday, 11 October, 1993 $T => 1993-10-11 wkdaynum(1993-10-11) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 18 October, 1993 +../tests/test.rem(447): Trig = Monday, 18 October, 1993 $T => 1993-10-18 wkdaynum(1993-10-18) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 25 October, 1993 +../tests/test.rem(447): Trig = Monday, 25 October, 1993 $T => 1993-10-25 wkdaynum(1993-10-25) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 1 November, 1993 +../tests/test.rem(447): Trig = Monday, 1 November, 1993 $T => 1993-11-01 wkdaynum(1993-11-01) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 8 November, 1993 +../tests/test.rem(447): Trig = Monday, 8 November, 1993 $T => 1993-11-08 wkdaynum(1993-11-08) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 15 November, 1993 +../tests/test.rem(447): Trig = Monday, 15 November, 1993 $T => 1993-11-15 wkdaynum(1993-11-15) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 22 November, 1993 +../tests/test.rem(447): Trig = Monday, 22 November, 1993 $T => 1993-11-22 wkdaynum(1993-11-22) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 29 November, 1993 +../tests/test.rem(447): Trig = Monday, 29 November, 1993 $T => 1993-11-29 wkdaynum(1993-11-29) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 6 December, 1993 +../tests/test.rem(447): Trig = Monday, 6 December, 1993 $T => 1993-12-06 wkdaynum(1993-12-06) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 13 December, 1993 +../tests/test.rem(447): Trig = Monday, 13 December, 1993 $T => 1993-12-13 wkdaynum(1993-12-13) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 20 December, 1993 +../tests/test.rem(447): Trig = Monday, 20 December, 1993 $T => 1993-12-20 wkdaynum(1993-12-20) => 1 1 == 3 => 0 -../tests/test.rem(446): Trig = Monday, 27 December, 1993 +../tests/test.rem(447): Trig = Monday, 27 December, 1993 $T => 1993-12-27 wkdaynum(1993-12-27) => 1 1 == 3 => 0 @@ -2575,6 +2577,7 @@ a056 "SDFJHSDF KSJDFH KJSDFH KSJDFH" a075 "05-05 Tuesday, May 5th, 1992 Tuesday, Ma"... a094 0 a117 -3 +a136 "FILE" a028 1 a047 -1 a066 0 @@ -2785,343 +2788,343 @@ Variable Value $Was "was" $Wednesday "Wednesday" msg [$April]% -../tests/test.rem(450): Trig = Saturday, 16 February, 1991 +../tests/test.rem(451): Trig = Saturday, 16 February, 1991 $April => "April" April msg [$August]% -../tests/test.rem(451): Trig = Saturday, 16 February, 1991 +../tests/test.rem(452): Trig = Saturday, 16 February, 1991 $August => "August" August msg [$CalcUTC]% -../tests/test.rem(452): Trig = Saturday, 16 February, 1991 +../tests/test.rem(453): Trig = Saturday, 16 February, 1991 $CalcUTC => 0 0 msg [$CalMode]% -../tests/test.rem(453): Trig = Saturday, 16 February, 1991 +../tests/test.rem(454): Trig = Saturday, 16 February, 1991 $CalMode => 0 0 msg [$Daemon]% -../tests/test.rem(454): Trig = Saturday, 16 February, 1991 +../tests/test.rem(455): Trig = Saturday, 16 February, 1991 $Daemon => 0 0 msg [$DateSep]% -../tests/test.rem(455): Trig = Saturday, 16 February, 1991 +../tests/test.rem(456): Trig = Saturday, 16 February, 1991 $DateSep => "-" - msg [$DateTimeSep]% -../tests/test.rem(456): Trig = Saturday, 16 February, 1991 +../tests/test.rem(457): Trig = Saturday, 16 February, 1991 $DateTimeSep => "@" @ msg [$December]% -../tests/test.rem(457): Trig = Saturday, 16 February, 1991 +../tests/test.rem(458): Trig = Saturday, 16 February, 1991 $December => "December" December msg [$DefaultColor]% -../tests/test.rem(458): Trig = Saturday, 16 February, 1991 +../tests/test.rem(459): Trig = Saturday, 16 February, 1991 $DefaultColor => "-1 -1 -1" -1 -1 -1 msg [$DefaultPrio]% -../tests/test.rem(459): Trig = Saturday, 16 February, 1991 +../tests/test.rem(460): Trig = Saturday, 16 February, 1991 $DefaultPrio => 5000 5000 msg [$DefaultTDelta]% -../tests/test.rem(460): Trig = Saturday, 16 February, 1991 +../tests/test.rem(461): Trig = Saturday, 16 February, 1991 $DefaultTDelta => 0 0 msg [$DeltaOffset]% -../tests/test.rem(461): Trig = Saturday, 16 February, 1991 +../tests/test.rem(462): Trig = Saturday, 16 February, 1991 $DeltaOffset => 0 0 msg [$DontFork]% -../tests/test.rem(462): Trig = Saturday, 16 February, 1991 +../tests/test.rem(463): Trig = Saturday, 16 February, 1991 $DontFork => 0 0 msg [$DontQueue]% -../tests/test.rem(463): Trig = Saturday, 16 February, 1991 +../tests/test.rem(464): Trig = Saturday, 16 February, 1991 $DontQueue => 0 0 msg [$DontTrigAts]% -../tests/test.rem(464): Trig = Saturday, 16 February, 1991 +../tests/test.rem(465): Trig = Saturday, 16 February, 1991 $DontTrigAts => 0 0 msg [$EndSent]% -../tests/test.rem(465): Trig = Saturday, 16 February, 1991 +../tests/test.rem(466): Trig = Saturday, 16 February, 1991 $EndSent => ".?!" .?! msg [$EndSentIg]% -../tests/test.rem(466): Trig = Saturday, 16 February, 1991 +../tests/test.rem(467): Trig = Saturday, 16 February, 1991 $EndSentIg => ""')]}>" "')]}> msg [$February]% -../tests/test.rem(467): Trig = Saturday, 16 February, 1991 +../tests/test.rem(468): Trig = Saturday, 16 February, 1991 $February => "February" February msg [$FirstIndent]% -../tests/test.rem(468): Trig = Saturday, 16 February, 1991 +../tests/test.rem(469): Trig = Saturday, 16 February, 1991 $FirstIndent => 0 0 msg [$FoldYear]% -../tests/test.rem(469): Trig = Saturday, 16 February, 1991 +../tests/test.rem(470): Trig = Saturday, 16 February, 1991 $FoldYear => 0 0 msg [$FormWidth]% -../tests/test.rem(470): Trig = Saturday, 16 February, 1991 +../tests/test.rem(471): Trig = Saturday, 16 February, 1991 $FormWidth => 72 72 msg [$Friday]% -../tests/test.rem(471): Trig = Saturday, 16 February, 1991 +../tests/test.rem(472): Trig = Saturday, 16 February, 1991 $Friday => "Friday" Friday msg [$HushMode]% -../tests/test.rem(472): Trig = Saturday, 16 February, 1991 +../tests/test.rem(473): Trig = Saturday, 16 February, 1991 $HushMode => 0 0 msg [$IgnoreOnce]% -../tests/test.rem(473): Trig = Saturday, 16 February, 1991 +../tests/test.rem(474): Trig = Saturday, 16 February, 1991 $IgnoreOnce => 1 1 msg [$InfDelta]% -../tests/test.rem(474): Trig = Saturday, 16 February, 1991 +../tests/test.rem(475): Trig = Saturday, 16 February, 1991 $InfDelta => 0 0 msg [$IntMax]% -../tests/test.rem(475): Trig = Saturday, 16 February, 1991 +../tests/test.rem(476): Trig = Saturday, 16 February, 1991 $IntMax => 2147483647 2147483647 msg [$IntMin]% -../tests/test.rem(476): Trig = Saturday, 16 February, 1991 +../tests/test.rem(477): Trig = Saturday, 16 February, 1991 $IntMin => -2147483648 -2147483648 msg [$January]% -../tests/test.rem(477): Trig = Saturday, 16 February, 1991 +../tests/test.rem(478): Trig = Saturday, 16 February, 1991 $January => "January" January msg [$July]% -../tests/test.rem(478): Trig = Saturday, 16 February, 1991 +../tests/test.rem(479): Trig = Saturday, 16 February, 1991 $July => "July" July msg [$June]% -../tests/test.rem(479): Trig = Saturday, 16 February, 1991 +../tests/test.rem(480): Trig = Saturday, 16 February, 1991 $June => "June" June msg [$LatDeg]% -../tests/test.rem(480): Trig = Saturday, 16 February, 1991 +../tests/test.rem(481): Trig = Saturday, 16 February, 1991 $LatDeg => 30 30 msg [$Latitude]% -../tests/test.rem(481): Trig = Saturday, 16 February, 1991 +../tests/test.rem(482): Trig = Saturday, 16 February, 1991 $Latitude => "30.500000" 30.500000 msg [$LatMin]% -../tests/test.rem(482): Trig = Saturday, 16 February, 1991 +../tests/test.rem(483): Trig = Saturday, 16 February, 1991 $LatMin => 30 30 msg [$LatSec]% -../tests/test.rem(483): Trig = Saturday, 16 February, 1991 +../tests/test.rem(484): Trig = Saturday, 16 February, 1991 $LatSec => 0 0 msg [$Location]% -../tests/test.rem(484): Trig = Saturday, 16 February, 1991 +../tests/test.rem(485): Trig = Saturday, 16 February, 1991 $Location => "Ottawa" Ottawa msg [$LongDeg]% -../tests/test.rem(485): Trig = Saturday, 16 February, 1991 +../tests/test.rem(486): Trig = Saturday, 16 February, 1991 $LongDeg => -25 -25 msg [$Longitude]% -../tests/test.rem(486): Trig = Saturday, 16 February, 1991 +../tests/test.rem(487): Trig = Saturday, 16 February, 1991 $Longitude => "24.750000" 24.750000 msg [$LongMin]% -../tests/test.rem(487): Trig = Saturday, 16 February, 1991 +../tests/test.rem(488): Trig = Saturday, 16 February, 1991 $LongMin => 15 15 msg [$LongSec]% -../tests/test.rem(488): Trig = Saturday, 16 February, 1991 +../tests/test.rem(489): Trig = Saturday, 16 February, 1991 $LongSec => 0 0 msg [$March]% -../tests/test.rem(489): Trig = Saturday, 16 February, 1991 +../tests/test.rem(490): Trig = Saturday, 16 February, 1991 $March => "March" March msg [$MaxSatIter]% -../tests/test.rem(490): Trig = Saturday, 16 February, 1991 +../tests/test.rem(491): Trig = Saturday, 16 February, 1991 $MaxSatIter => 150 150 msg [$MaxStringLen]% -../tests/test.rem(491): Trig = Saturday, 16 February, 1991 +../tests/test.rem(492): Trig = Saturday, 16 February, 1991 $MaxStringLen => 65535 65535 msg [$May]% -../tests/test.rem(492): Trig = Saturday, 16 February, 1991 +../tests/test.rem(493): Trig = Saturday, 16 February, 1991 $May => "May" May msg [$MinsFromUTC]% -../tests/test.rem(493): Trig = Saturday, 16 February, 1991 +../tests/test.rem(494): Trig = Saturday, 16 February, 1991 $MinsFromUTC => -300 -300 msg [$Monday]% -../tests/test.rem(494): Trig = Saturday, 16 February, 1991 +../tests/test.rem(495): Trig = Saturday, 16 February, 1991 $Monday => "Monday" Monday msg [$NextMode]% -../tests/test.rem(495): Trig = Saturday, 16 February, 1991 +../tests/test.rem(496): Trig = Saturday, 16 February, 1991 $NextMode => 0 0 msg [$November]% -../tests/test.rem(496): Trig = Saturday, 16 February, 1991 +../tests/test.rem(497): Trig = Saturday, 16 February, 1991 $November => "November" November msg [$NumQueued]% -../tests/test.rem(497): Trig = Saturday, 16 February, 1991 +../tests/test.rem(498): Trig = Saturday, 16 February, 1991 $NumQueued => 0 0 msg [$NumTrig]% -../tests/test.rem(498): Trig = Saturday, 16 February, 1991 +../tests/test.rem(499): Trig = Saturday, 16 February, 1991 $NumTrig => 85 85 msg [$October]% -../tests/test.rem(499): Trig = Saturday, 16 February, 1991 +../tests/test.rem(500): Trig = Saturday, 16 February, 1991 $October => "October" October msg [$PrefixLineNo]% -../tests/test.rem(500): Trig = Saturday, 16 February, 1991 +../tests/test.rem(501): Trig = Saturday, 16 February, 1991 $PrefixLineNo => 0 0 msg [$PSCal]% -../tests/test.rem(501): Trig = Saturday, 16 February, 1991 +../tests/test.rem(502): Trig = Saturday, 16 February, 1991 $PSCal => 0 0 msg [$RunOff]% -../tests/test.rem(502): Trig = Saturday, 16 February, 1991 +../tests/test.rem(503): Trig = Saturday, 16 February, 1991 $RunOff => 0 0 msg [$Saturday]% -../tests/test.rem(503): Trig = Saturday, 16 February, 1991 +../tests/test.rem(504): Trig = Saturday, 16 February, 1991 $Saturday => "Saturday" Saturday msg [$September]% -../tests/test.rem(504): Trig = Saturday, 16 February, 1991 +../tests/test.rem(505): Trig = Saturday, 16 February, 1991 $September => "September" September msg [$SimpleCal]% -../tests/test.rem(505): Trig = Saturday, 16 February, 1991 +../tests/test.rem(506): Trig = Saturday, 16 February, 1991 $SimpleCal => 0 0 msg [$SortByDate]% -../tests/test.rem(506): Trig = Saturday, 16 February, 1991 +../tests/test.rem(507): Trig = Saturday, 16 February, 1991 $SortByDate => 0 0 msg [$SortByPrio]% -../tests/test.rem(507): Trig = Saturday, 16 February, 1991 +../tests/test.rem(508): Trig = Saturday, 16 February, 1991 $SortByPrio => 0 0 msg [$SortByTime]% -../tests/test.rem(508): Trig = Saturday, 16 February, 1991 +../tests/test.rem(509): Trig = Saturday, 16 February, 1991 $SortByTime => 0 0 msg [$SubsIndent]% -../tests/test.rem(509): Trig = Saturday, 16 February, 1991 +../tests/test.rem(510): Trig = Saturday, 16 February, 1991 $SubsIndent => 0 0 msg [$Sunday]% -../tests/test.rem(510): Trig = Saturday, 16 February, 1991 +../tests/test.rem(511): Trig = Saturday, 16 February, 1991 $Sunday => "Sunday" Sunday msg [$T]% -../tests/test.rem(511): Trig = Saturday, 16 February, 1991 +../tests/test.rem(512): Trig = Saturday, 16 February, 1991 $T => 1991-02-16 1991-02-16 msg [$Td]% -../tests/test.rem(512): Trig = Saturday, 16 February, 1991 +../tests/test.rem(513): Trig = Saturday, 16 February, 1991 $Td => 16 16 msg [$Thursday]% -../tests/test.rem(513): Trig = Saturday, 16 February, 1991 +../tests/test.rem(514): Trig = Saturday, 16 February, 1991 $Thursday => "Thursday" Thursday msg [$TimeSep]% -../tests/test.rem(514): Trig = Saturday, 16 February, 1991 +../tests/test.rem(515): Trig = Saturday, 16 February, 1991 $TimeSep => ":" : msg [$Tm]% -../tests/test.rem(515): Trig = Saturday, 16 February, 1991 +../tests/test.rem(516): Trig = Saturday, 16 February, 1991 $Tm => 2 2 msg [$Tuesday]% -../tests/test.rem(516): Trig = Saturday, 16 February, 1991 +../tests/test.rem(517): Trig = Saturday, 16 February, 1991 $Tuesday => "Tuesday" Tuesday msg [$Tw]% -../tests/test.rem(517): Trig = Saturday, 16 February, 1991 +../tests/test.rem(518): Trig = Saturday, 16 February, 1991 $Tw => 6 6 msg [$Ty]% -../tests/test.rem(518): Trig = Saturday, 16 February, 1991 +../tests/test.rem(519): Trig = Saturday, 16 February, 1991 $Ty => 1991 1991 msg [$U]% -../tests/test.rem(519): Trig = Saturday, 16 February, 1991 +../tests/test.rem(520): Trig = Saturday, 16 February, 1991 $U => 1991-02-16 1991-02-16 msg [$Ud]% -../tests/test.rem(520): Trig = Saturday, 16 February, 1991 +../tests/test.rem(521): Trig = Saturday, 16 February, 1991 $Ud => 16 16 msg [$Um]% -../tests/test.rem(521): Trig = Saturday, 16 February, 1991 +../tests/test.rem(522): Trig = Saturday, 16 February, 1991 $Um => 2 2 msg [$UntimedFirst]% -../tests/test.rem(522): Trig = Saturday, 16 February, 1991 +../tests/test.rem(523): Trig = Saturday, 16 February, 1991 $UntimedFirst => 0 0 msg [$Uw]% -../tests/test.rem(523): Trig = Saturday, 16 February, 1991 +../tests/test.rem(524): Trig = Saturday, 16 February, 1991 $Uw => 6 6 msg [$Uy]% -../tests/test.rem(524): Trig = Saturday, 16 February, 1991 +../tests/test.rem(525): Trig = Saturday, 16 February, 1991 $Uy => 1991 1991 msg [$Wednesday]% -../tests/test.rem(525): Trig = Saturday, 16 February, 1991 +../tests/test.rem(526): Trig = Saturday, 16 February, 1991 $Wednesday => "Wednesday" Wednesday # Diagnose until before start date, only for non-constant expressions and # fully-specified start date REM Mon 1992 UNTIL 1991-01-01 MSG Not diagnosed - not fully-specified start -../tests/test.rem(529): Expired +../tests/test.rem(530): Expired REM 1992-01-01 *1 UNTIL 1991-12-31 MSG Diagnosed -../tests/test.rem(530): Warning: UNTIL/THROUGH date earlier than start date -../tests/test.rem(530): Trig = Wednesday, 1 January, 1992 +../tests/test.rem(531): Warning: UNTIL/THROUGH date earlier than start date +../tests/test.rem(531): Trig = Wednesday, 1 January, 1992 set x '1992-01-01' REM [x] *1 UNTIL 1991-12-31 MSG Not diagnosed - nonconst expression x => 1992-01-01 -../tests/test.rem(532): Trig = Wednesday, 1 January, 1992 +../tests/test.rem(533): Trig = Wednesday, 1 January, 1992 REM MON FROM 1992-01-01 UNTIL 1991-12-31 Diagnosed -../tests/test.rem(534): Warning: UNTIL/THROUGH date earlier than FROM date -../tests/test.rem(534): Expired -REM MON SCANFROM 1992-01-01 UNTIL 1991-12-31 Diagnosed -../tests/test.rem(535): Warning: UNTIL/THROUGH date earlier than SCANFROM date +../tests/test.rem(535): Warning: UNTIL/THROUGH date earlier than FROM date ../tests/test.rem(535): Expired +REM MON SCANFROM 1992-01-01 UNTIL 1991-12-31 Diagnosed +../tests/test.rem(536): Warning: UNTIL/THROUGH date earlier than SCANFROM date +../tests/test.rem(536): Expired REM MON FROM [x] UNTIL 1991-12-31 Not diagnosed x => 1992-01-01 -../tests/test.rem(537): Expired +../tests/test.rem(538): Expired REM MON SCANFROM [x] UNTIL 1991-12-31 Not diagnosed x => 1992-01-01 -../tests/test.rem(538): Expired +../tests/test.rem(539): Expired REM 1992-01-01 UNTIL 1992-02-02 MSG Diagnosed -../tests/test.rem(540): Warning: Useless use of UNTIL with fully-specified date and no *rep -../tests/test.rem(540): Trig = Wednesday, 1 January, 1992 -REM [x] UNTIL 1992-02-02 MSG Diagnosed -x => 1992-01-01 ../tests/test.rem(541): Warning: Useless use of UNTIL with fully-specified date and no *rep ../tests/test.rem(541): Trig = Wednesday, 1 January, 1992 +REM [x] UNTIL 1992-02-02 MSG Diagnosed +x => 1992-01-01 +../tests/test.rem(542): Warning: Useless use of UNTIL with fully-specified date and no *rep +../tests/test.rem(542): Trig = Wednesday, 1 January, 1992 dump $aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa Variable Value @@ -3129,10 +3132,10 @@ Variable Value $aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa: Name too long OMIT 2010-09-03 THROUGH 2010-09-15 OMIT December 25 MSG X -../tests/test.rem(545): Trig = Wednesday, 25 December, 1991 +../tests/test.rem(546): Trig = Wednesday, 25 December, 1991 # Next should give a parse error OMIT 26 Dec 2010 THROUGH 27 Dec 2010 MSG This is not legal -../tests/test.rem(547): Trig = Sunday, 26 December, 2010 +../tests/test.rem(548): Trig = Sunday, 26 December, 2010 OMIT DUMP Global Full OMITs (16 of maximum allowed 1000): 1991-03-11 @@ -3164,287 +3167,287 @@ a => 5761 hebdate(14, "Adar", 1991-02-16, 5761) => 1991-02-28 trigger(1991-02-28) => "28 February 1991" Leaving UserFN _i() => "28 February 1991" -../tests/test.rem(550): Trig = Thursday, 28 February, 1991 +../tests/test.rem(551): Trig = Thursday, 28 February, 1991 # Regression test for bug found by Larry Hynes REM SATISFY [day(trigdate()-25) == 14] MSG Foo -../tests/test.rem(553): Trig = Saturday, 16 February, 1991 +../tests/test.rem(554): Trig = Saturday, 16 February, 1991 trigdate() => 1991-02-16 1991-02-16 - 25 => 1991-01-22 day(1991-01-22) => 22 22 == 14 => 0 -../tests/test.rem(553): Trig = Sunday, 17 February, 1991 +../tests/test.rem(554): Trig = Sunday, 17 February, 1991 trigdate() => 1991-02-17 1991-02-17 - 25 => 1991-01-23 day(1991-01-23) => 23 23 == 14 => 0 -../tests/test.rem(553): Trig = Monday, 18 February, 1991 +../tests/test.rem(554): Trig = Monday, 18 February, 1991 trigdate() => 1991-02-18 1991-02-18 - 25 => 1991-01-24 day(1991-01-24) => 24 24 == 14 => 0 -../tests/test.rem(553): Trig = Tuesday, 19 February, 1991 +../tests/test.rem(554): Trig = Tuesday, 19 February, 1991 trigdate() => 1991-02-19 1991-02-19 - 25 => 1991-01-25 day(1991-01-25) => 25 25 == 14 => 0 -../tests/test.rem(553): Trig = Wednesday, 20 February, 1991 +../tests/test.rem(554): Trig = Wednesday, 20 February, 1991 trigdate() => 1991-02-20 1991-02-20 - 25 => 1991-01-26 day(1991-01-26) => 26 26 == 14 => 0 -../tests/test.rem(553): Trig = Thursday, 21 February, 1991 +../tests/test.rem(554): Trig = Thursday, 21 February, 1991 trigdate() => 1991-02-21 1991-02-21 - 25 => 1991-01-27 day(1991-01-27) => 27 27 == 14 => 0 -../tests/test.rem(553): Trig = Friday, 22 February, 1991 +../tests/test.rem(554): Trig = Friday, 22 February, 1991 trigdate() => 1991-02-22 1991-02-22 - 25 => 1991-01-28 day(1991-01-28) => 28 28 == 14 => 0 -../tests/test.rem(553): Trig = Saturday, 23 February, 1991 +../tests/test.rem(554): Trig = Saturday, 23 February, 1991 trigdate() => 1991-02-23 1991-02-23 - 25 => 1991-01-29 day(1991-01-29) => 29 29 == 14 => 0 -../tests/test.rem(553): Trig = Sunday, 24 February, 1991 +../tests/test.rem(554): Trig = Sunday, 24 February, 1991 trigdate() => 1991-02-24 1991-02-24 - 25 => 1991-01-30 day(1991-01-30) => 30 30 == 14 => 0 -../tests/test.rem(553): Trig = Monday, 25 February, 1991 +../tests/test.rem(554): Trig = Monday, 25 February, 1991 trigdate() => 1991-02-25 1991-02-25 - 25 => 1991-01-31 day(1991-01-31) => 31 31 == 14 => 0 -../tests/test.rem(553): Trig = Tuesday, 26 February, 1991 +../tests/test.rem(554): Trig = Tuesday, 26 February, 1991 trigdate() => 1991-02-26 1991-02-26 - 25 => 1991-02-01 day(1991-02-01) => 1 1 == 14 => 0 -../tests/test.rem(553): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(554): Trig = Wednesday, 27 February, 1991 trigdate() => 1991-02-27 1991-02-27 - 25 => 1991-02-02 day(1991-02-02) => 2 2 == 14 => 0 -../tests/test.rem(553): Trig = Thursday, 28 February, 1991 +../tests/test.rem(554): Trig = Thursday, 28 February, 1991 trigdate() => 1991-02-28 1991-02-28 - 25 => 1991-02-03 day(1991-02-03) => 3 3 == 14 => 0 -../tests/test.rem(553): Trig = Friday, 1 March, 1991 +../tests/test.rem(554): Trig = Friday, 1 March, 1991 trigdate() => 1991-03-01 1991-03-01 - 25 => 1991-02-04 day(1991-02-04) => 4 4 == 14 => 0 -../tests/test.rem(553): Trig = Saturday, 2 March, 1991 +../tests/test.rem(554): Trig = Saturday, 2 March, 1991 trigdate() => 1991-03-02 1991-03-02 - 25 => 1991-02-05 day(1991-02-05) => 5 5 == 14 => 0 -../tests/test.rem(553): Trig = Sunday, 3 March, 1991 +../tests/test.rem(554): Trig = Sunday, 3 March, 1991 trigdate() => 1991-03-03 1991-03-03 - 25 => 1991-02-06 day(1991-02-06) => 6 6 == 14 => 0 -../tests/test.rem(553): Trig = Monday, 4 March, 1991 +../tests/test.rem(554): Trig = Monday, 4 March, 1991 trigdate() => 1991-03-04 1991-03-04 - 25 => 1991-02-07 day(1991-02-07) => 7 7 == 14 => 0 -../tests/test.rem(553): Trig = Tuesday, 5 March, 1991 +../tests/test.rem(554): Trig = Tuesday, 5 March, 1991 trigdate() => 1991-03-05 1991-03-05 - 25 => 1991-02-08 day(1991-02-08) => 8 8 == 14 => 0 -../tests/test.rem(553): Trig = Wednesday, 6 March, 1991 +../tests/test.rem(554): Trig = Wednesday, 6 March, 1991 trigdate() => 1991-03-06 1991-03-06 - 25 => 1991-02-09 day(1991-02-09) => 9 9 == 14 => 0 -../tests/test.rem(553): Trig = Thursday, 7 March, 1991 +../tests/test.rem(554): Trig = Thursday, 7 March, 1991 trigdate() => 1991-03-07 1991-03-07 - 25 => 1991-02-10 day(1991-02-10) => 10 10 == 14 => 0 -../tests/test.rem(553): Trig = Friday, 8 March, 1991 +../tests/test.rem(554): Trig = Friday, 8 March, 1991 trigdate() => 1991-03-08 1991-03-08 - 25 => 1991-02-11 day(1991-02-11) => 11 11 == 14 => 0 -../tests/test.rem(553): Trig = Saturday, 9 March, 1991 +../tests/test.rem(554): Trig = Saturday, 9 March, 1991 trigdate() => 1991-03-09 1991-03-09 - 25 => 1991-02-12 day(1991-02-12) => 12 12 == 14 => 0 -../tests/test.rem(553): Trig = Sunday, 10 March, 1991 +../tests/test.rem(554): Trig = Sunday, 10 March, 1991 trigdate() => 1991-03-10 1991-03-10 - 25 => 1991-02-13 day(1991-02-13) => 13 13 == 14 => 0 -../tests/test.rem(553): Trig = Monday, 11 March, 1991 +../tests/test.rem(554): Trig = Monday, 11 March, 1991 trigdate() => 1991-03-11 1991-03-11 - 25 => 1991-02-14 day(1991-02-14) => 14 14 == 14 => 1 -../tests/test.rem(553): Trig(satisfied) = Monday, 11 March, 1991 +../tests/test.rem(554): Trig(satisfied) = Monday, 11 March, 1991 # Check combo of SATISFY and long-duration events REM 14 SATISFY [$Tw == 4] MSG Thursday, the 14th -../tests/test.rem(556): Trig = Thursday, 14 March, 1991 +../tests/test.rem(557): Trig = Thursday, 14 March, 1991 $Tw => 4 4 == 4 => 1 -../tests/test.rem(556): Trig(satisfied) = Thursday, 14 March, 1991 +../tests/test.rem(557): Trig(satisfied) = Thursday, 14 March, 1991 REM 14 AT 16:00 DURATION 8:00 SATISFY [$Tw == 4] MSG Thursday, the 14th -../tests/test.rem(557): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:00 +../tests/test.rem(558): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:00 $Tw => 4 4 == 4 => 1 -../tests/test.rem(557): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 08:00 +../tests/test.rem(558): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 08:00 REM 14 AT 16:00 DURATION 8:01 SATISFY [$Tw == 4] MSG Thursday, the 14th -../tests/test.rem(558): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 -../tests/test.rem(558): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 +../tests/test.rem(559): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 +../tests/test.rem(559): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 $Tw => 4 4 == 4 => 1 -../tests/test.rem(558): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 +../tests/test.rem(559): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 REM 14 AT 16:00 DURATION 32:00 SATISFY [$Tw == 4] MSG Thursday, the 14th -../tests/test.rem(559): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 -../tests/test.rem(559): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 +../tests/test.rem(560): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 +../tests/test.rem(560): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 $Tw => 4 4 == 4 => 1 -../tests/test.rem(559): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 +../tests/test.rem(560): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 REM 14 AT 16:00 DURATION 32:01 SATISFY [$Tw == 4] MSG Thursday, the 14th -../tests/test.rem(560): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:01 -../tests/test.rem(560): Trig = Thursday, 14 February, 1991 AT 16:00 DURATION 32:01 +../tests/test.rem(561): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:01 +../tests/test.rem(561): Trig = Thursday, 14 February, 1991 AT 16:00 DURATION 32:01 $Tw => 4 4 == 4 => 1 -../tests/test.rem(560): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 00:01 -../tests/test.rem(560): Trig(satisfied) = Saturday, 16 February, 1991 AT 00:00 DURATION 00:01 +../tests/test.rem(561): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 00:01 +../tests/test.rem(561): Trig(satisfied) = Saturday, 16 February, 1991 AT 00:00 DURATION 00:01 Thursday, the 14th REM 14 AT 16:00 DURATION 40:00 SATISFY [$Tw == 4] MSG Thursday, the 14th -../tests/test.rem(561): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 40:00 -../tests/test.rem(561): Trig = Thursday, 14 February, 1991 AT 16:00 DURATION 40:00 +../tests/test.rem(562): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 40:00 +../tests/test.rem(562): Trig = Thursday, 14 February, 1991 AT 16:00 DURATION 40:00 $Tw => 4 4 == 4 => 1 -../tests/test.rem(561): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 08:00 -../tests/test.rem(561): Trig(satisfied) = Saturday, 16 February, 1991 AT 00:00 DURATION 08:00 +../tests/test.rem(562): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 08:00 +../tests/test.rem(562): Trig(satisfied) = Saturday, 16 February, 1991 AT 00:00 DURATION 08:00 Thursday, the 14th # This is now an error REM DURATION 15:00 MSG Should fail... need AT if you have DURATION. -../tests/test.rem(564): Cannot specify DURATION without specifying AT +../tests/test.rem(565): Cannot specify DURATION without specifying AT # Parsing of AM/PM times REM AT 0:00am MSG foo 0a -../tests/test.rem(567): Expecting time after AT +../tests/test.rem(568): Expecting time after AT REM AT 1:00AM MSG foo 1a -../tests/test.rem(568): Trig = Saturday, 16 February, 1991 AT 01:00 +../tests/test.rem(569): Trig = Saturday, 16 February, 1991 AT 01:00 foo 1a REM AT 2:00am MSG foo 2a -../tests/test.rem(569): Trig = Saturday, 16 February, 1991 AT 02:00 +../tests/test.rem(570): Trig = Saturday, 16 February, 1991 AT 02:00 foo 2a REM AT 3:00AM MSG foo 3a -../tests/test.rem(570): Trig = Saturday, 16 February, 1991 AT 03:00 +../tests/test.rem(571): Trig = Saturday, 16 February, 1991 AT 03:00 foo 3a REM AT 4:00am MSG foo 4a -../tests/test.rem(571): Trig = Saturday, 16 February, 1991 AT 04:00 +../tests/test.rem(572): Trig = Saturday, 16 February, 1991 AT 04:00 foo 4a REM AT 5:00AM MSG foo 5a -../tests/test.rem(572): Trig = Saturday, 16 February, 1991 AT 05:00 +../tests/test.rem(573): Trig = Saturday, 16 February, 1991 AT 05:00 foo 5a REM AT 6:00am MSG foo 6a -../tests/test.rem(573): Trig = Saturday, 16 February, 1991 AT 06:00 +../tests/test.rem(574): Trig = Saturday, 16 February, 1991 AT 06:00 foo 6a REM AT 7:00AM MSG foo 7a -../tests/test.rem(574): Trig = Saturday, 16 February, 1991 AT 07:00 +../tests/test.rem(575): Trig = Saturday, 16 February, 1991 AT 07:00 foo 7a REM AT 8:00am MSG foo 8a -../tests/test.rem(575): Trig = Saturday, 16 February, 1991 AT 08:00 +../tests/test.rem(576): Trig = Saturday, 16 February, 1991 AT 08:00 foo 8a REM AT 9:00AM MSG foo 9a -../tests/test.rem(576): Trig = Saturday, 16 February, 1991 AT 09:00 +../tests/test.rem(577): Trig = Saturday, 16 February, 1991 AT 09:00 foo 9a REM AT 10:00am MSG foo 10a -../tests/test.rem(577): Trig = Saturday, 16 February, 1991 AT 10:00 +../tests/test.rem(578): Trig = Saturday, 16 February, 1991 AT 10:00 foo 10a REM AT 11:00AM MSG foo 11a -../tests/test.rem(578): Trig = Saturday, 16 February, 1991 AT 11:00 +../tests/test.rem(579): Trig = Saturday, 16 February, 1991 AT 11:00 foo 11a REM AT 12:00am MSG foo 12a -../tests/test.rem(579): Trig = Saturday, 16 February, 1991 AT 00:00 +../tests/test.rem(580): Trig = Saturday, 16 February, 1991 AT 00:00 foo 12a REM AT 13:00AM MSG foo 13a -../tests/test.rem(580): Expecting time after AT -REM AT 0:00pm MSG foo 0p ../tests/test.rem(581): Expecting time after AT +REM AT 0:00pm MSG foo 0p +../tests/test.rem(582): Expecting time after AT REM AT 1:00PM MSG foo 1p -../tests/test.rem(582): Trig = Saturday, 16 February, 1991 AT 13:00 +../tests/test.rem(583): Trig = Saturday, 16 February, 1991 AT 13:00 foo 1p REM AT 2:00pm MSG foo 2p -../tests/test.rem(583): Trig = Saturday, 16 February, 1991 AT 14:00 +../tests/test.rem(584): Trig = Saturday, 16 February, 1991 AT 14:00 foo 2p REM AT 3:00PM MSG foo 3p -../tests/test.rem(584): Trig = Saturday, 16 February, 1991 AT 15:00 +../tests/test.rem(585): Trig = Saturday, 16 February, 1991 AT 15:00 foo 3p REM AT 4:00pm MSG foo 4p -../tests/test.rem(585): Trig = Saturday, 16 February, 1991 AT 16:00 +../tests/test.rem(586): Trig = Saturday, 16 February, 1991 AT 16:00 foo 4p REM AT 5:00PM MSG foo 5p -../tests/test.rem(586): Trig = Saturday, 16 February, 1991 AT 17:00 +../tests/test.rem(587): Trig = Saturday, 16 February, 1991 AT 17:00 foo 5p REM AT 6:00pm MSG foo 6p -../tests/test.rem(587): Trig = Saturday, 16 February, 1991 AT 18:00 +../tests/test.rem(588): Trig = Saturday, 16 February, 1991 AT 18:00 foo 6p REM AT 7:00PM MSG foo 7p -../tests/test.rem(588): Trig = Saturday, 16 February, 1991 AT 19:00 +../tests/test.rem(589): Trig = Saturday, 16 February, 1991 AT 19:00 foo 7p REM AT 8:00pm MSG foo 8p -../tests/test.rem(589): Trig = Saturday, 16 February, 1991 AT 20:00 +../tests/test.rem(590): Trig = Saturday, 16 February, 1991 AT 20:00 foo 8p REM AT 9:00PM MSG foo 9p -../tests/test.rem(590): Trig = Saturday, 16 February, 1991 AT 21:00 +../tests/test.rem(591): Trig = Saturday, 16 February, 1991 AT 21:00 foo 9p REM AT 10:00pm MSG foo 10p -../tests/test.rem(591): Trig = Saturday, 16 February, 1991 AT 22:00 +../tests/test.rem(592): Trig = Saturday, 16 February, 1991 AT 22:00 foo 10p REM AT 11:00PM MSG foo 11p -../tests/test.rem(592): Trig = Saturday, 16 February, 1991 AT 23:00 +../tests/test.rem(593): Trig = Saturday, 16 February, 1991 AT 23:00 foo 11p REM AT 12:00pm MSG foo 12p -../tests/test.rem(593): Trig = Saturday, 16 February, 1991 AT 12:00 +../tests/test.rem(594): Trig = Saturday, 16 February, 1991 AT 12:00 foo 12p REM AT 13:00PM MSG foo 13p -../tests/test.rem(594): Expecting time after AT +../tests/test.rem(595): Expecting time after AT DEBUG +x SET x 0:00am + 0 -../tests/test.rem(597): Ill-formed time +../tests/test.rem(598): Ill-formed time SET x 1:00AM + 0 01:00 + 0 => 01:00 SET x 2:00am + 0 @@ -3470,10 +3473,10 @@ SET x 11:00AM + 0 SET x 12:00am + 0 00:00 + 0 => 00:00 SET x 13:00AM + 0 -../tests/test.rem(610): Ill-formed time +../tests/test.rem(611): Ill-formed time SET x 0:00pm + 0 -../tests/test.rem(612): Ill-formed time +../tests/test.rem(613): Ill-formed time SET x 1:00PM + 0 13:00 + 0 => 13:00 SET x 2:00pm + 0 @@ -3499,10 +3502,10 @@ SET x 11:00PM + 0 SET x 12:00pm + 0 12:00 + 0 => 12:00 SET x 13:00PM + 0 -../tests/test.rem(625): Ill-formed time +../tests/test.rem(626): Ill-formed time SET x '2015-02-03@0:00am' + 0 -../tests/test.rem(627): Ill-formed time +../tests/test.rem(628): Ill-formed time SET x '2015-02-03@1:00AM' + 0 2015-02-03@01:00 + 0 => 2015-02-03@01:00 SET x '2015-02-03@2:00am' + 0 @@ -3528,10 +3531,10 @@ SET x '2015-02-03@11:00AM' + 0 SET x '2015-02-03@12:00am' + 0 2015-02-03@00:00 + 0 => 2015-02-03@00:00 SET x '2015-02-03@13:00AM' + 0 -../tests/test.rem(640): Ill-formed time +../tests/test.rem(641): Ill-formed time SET x '2015-02-03@0:00pm' + 0 -../tests/test.rem(642): Ill-formed time +../tests/test.rem(643): Ill-formed time SET x '2015-02-03@1:00PM' + 0 2015-02-03@13:00 + 0 => 2015-02-03@13:00 SET x '2015-02-03@2:00pm' + 0 @@ -3557,7 +3560,7 @@ SET x '2015-02-03@11:00PM' + 0 SET x '2015-02-03@12:00pm' + 0 2015-02-03@12:00 + 0 => 2015-02-03@12:00 SET x '2015-02-03@13:00PM' + 0 -../tests/test.rem(655): Ill-formed time +../tests/test.rem(656): Ill-formed time # Test the ampm function set x ampm(0:12) + "" @@ -3653,88 +3656,88 @@ coerce("DATETIME", "2020-05-05@1:45pm") => 2020-05-05@13:45 set a $IntMin - 1 $IntMin => -2147483648 -2147483648 - 1 => Number too high -../tests/test.rem(694): `-': Number too high +../tests/test.rem(695): `-': Number too high set a $IntMin - $IntMax $IntMin => -2147483648 $IntMax => 2147483647 -2147483648 - 2147483647 => Number too high -../tests/test.rem(695): `-': Number too high +../tests/test.rem(696): `-': Number too high set a $IntMax - $IntMin $IntMax => 2147483647 $IntMin => -2147483648 2147483647 - -2147483648 => Number too high -../tests/test.rem(696): `-': Number too high +../tests/test.rem(697): `-': Number too high set a $IntMax - (-1) $IntMax => 2147483647 - 1 => -1 2147483647 - -1 => Number too high -../tests/test.rem(697): `-': Number too high +../tests/test.rem(698): `-': Number too high set a $IntMax + 1 $IntMax => 2147483647 2147483647 + 1 => Number too high -../tests/test.rem(698): `+': Number too high +../tests/test.rem(699): `+': Number too high set a $IntMax + $IntMax $IntMax => 2147483647 $IntMax => 2147483647 2147483647 + 2147483647 => Number too high -../tests/test.rem(699): `+': Number too high +../tests/test.rem(700): `+': Number too high set a $IntMin + (-1) $IntMin => -2147483648 - 1 => -1 -2147483648 + -1 => Number too high -../tests/test.rem(700): `+': Number too high +../tests/test.rem(701): `+': Number too high set a $IntMin + $IntMin $IntMin => -2147483648 $IntMin => -2147483648 -2147483648 + -2147483648 => Number too high -../tests/test.rem(701): `+': Number too high +../tests/test.rem(702): `+': Number too high set a $IntMax * 2 $IntMax => 2147483647 2147483647 * 2 => Number too high -../tests/test.rem(702): `*': Number too high +../tests/test.rem(703): `*': Number too high set a $IntMax * $IntMax $IntMax => 2147483647 $IntMax => 2147483647 2147483647 * 2147483647 => Number too high -../tests/test.rem(703): `*': Number too high +../tests/test.rem(704): `*': Number too high set a $IntMax * $IntMin $IntMax => 2147483647 $IntMin => -2147483648 2147483647 * -2147483648 => Number too high -../tests/test.rem(704): `*': Number too high +../tests/test.rem(705): `*': Number too high set a $IntMin * 2 $IntMin => -2147483648 -2147483648 * 2 => Number too high -../tests/test.rem(705): `*': Number too high +../tests/test.rem(706): `*': Number too high set a $IntMin * $IntMin $IntMin => -2147483648 $IntMin => -2147483648 -2147483648 * -2147483648 => Number too high -../tests/test.rem(706): `*': Number too high +../tests/test.rem(707): `*': Number too high set a $IntMin * $IntMax $IntMin => -2147483648 $IntMax => 2147483647 -2147483648 * 2147483647 => Number too high -../tests/test.rem(707): `*': Number too high +../tests/test.rem(708): `*': Number too high set a $IntMin / (-1) $IntMin => -2147483648 - 1 => -1 -2147483648 / -1 => Number too high -../tests/test.rem(708): `/': Number too high +../tests/test.rem(709): `/': Number too high set a $IntMin * (-1) $IntMin => -2147483648 - 1 => -1 -2147483648 * -1 => Number too high -../tests/test.rem(709): `*': Number too high +../tests/test.rem(710): `*': Number too high set a (-1) * $IntMin - 1 => -1 $IntMin => -2147483648 -1 * -2147483648 => Number too high -../tests/test.rem(710): `*': Number too high +../tests/test.rem(711): `*': Number too high set a abs($IntMin) $IntMin => -2147483648 abs(-2147483648) => Number too high -../tests/test.rem(711): Number too high +../tests/test.rem(712): Number too high # The "isany" function set a isany(1) @@ -3761,29 +3764,29 @@ set a shellescape(" !\"#$%%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ shellescape(" !"#$%%&'()*+,-./0123456789:;<=>?@ABCDEF"...) => "\ \!\"\#\$\%\%\&\'\(\)\*+,-./0123456789\"... msg [a] -../tests/test.rem(727): Trig = Saturday, 16 February, 1991 +../tests/test.rem(728): Trig = Saturday, 16 February, 1991 a => "\ \!\"\#\$\%\%\&\'\(\)\*+,-./0123456789\"... \ \!\"\#\$\\\&\'\(\)\*+,-./0123456789\:\;\<=\>\?@ABCDEFGHIJKLMNOPQRSTUVWXYZ\[\\\]\^_\`abcdefghijklmnopqrstuvwxyz\{\|\}\~ # Deprecated functions set x psshade(50) -psshade(50) => ../tests/test.rem(730): psshade() is deprecated; use SPECIAL SHADE instead. +psshade(50) => ../tests/test.rem(731): psshade() is deprecated; use SPECIAL SHADE instead. "/_A LineWidth 2 div def _A _A moveto Box"... set x psmoon(0) -psmoon(0) => ../tests/test.rem(731): psmoon() is deprecated; use SPECIAL MOON instead. +psmoon(0) => ../tests/test.rem(732): psmoon() is deprecated; use SPECIAL MOON instead. "gsave 0 setgray newpath Border DaySize 2"... # Trig IF trig("sun +1") || trig("thu +1") -trig("sun +1") => ../tests/test.rem(734): Trig = Sunday, 17 February, 1991 +trig("sun +1") => ../tests/test.rem(735): Trig = Sunday, 17 February, 1991 1991-02-17 -trig("thu +1") => ../tests/test.rem(734): Trig = Thursday, 21 February, 1991 +trig("thu +1") => ../tests/test.rem(735): Trig = Thursday, 21 February, 1991 1990-01-01 1991-02-17 || 1990-01-01 => 1991-02-17 REM [trig()] +1 MSG Foo %b trig() => 1991-02-17 -../tests/test.rem(735): Trig = Sunday, 17 February, 1991 +../tests/test.rem(736): Trig = Sunday, 17 February, 1991 Foo tomorrow ENDIF @@ -3791,15 +3794,15 @@ ENDIF # Trig with a bad warnfunc FSET w(x) x/0 IF trig("sun warn w") || trig("thu warn w") -trig("sun warn w") => ../tests/test.rem(740): Trig = Sunday, 17 February, 1991 +trig("sun warn w") => ../tests/test.rem(741): Trig = Sunday, 17 February, 1991 Entering UserFN w(1) x => 1 1 / 0 => Division by zero -../tests/test.rem(740): -../tests/test.rem(739): In function `w': `/': Division by zero +../tests/test.rem(741): +../tests/test.rem(740): In function `w': `/': Division by zero Leaving UserFN w() => Division by zero 1990-01-01 -trig("thu warn w") => ../tests/test.rem(740): Trig = Thursday, 21 February, 1991 +trig("thu warn w") => ../tests/test.rem(741): Trig = Thursday, 21 February, 1991 Entering UserFN w(1) x => 1 1 / 0 => Division by zero @@ -3815,7 +3818,7 @@ FSET w(x) choose(x, 5, 3, 1, 0) # Ugh. This is where short-circuit logical operators # would really come in handy. IF trig("sun warn w") || trig("thu warn w") -trig("sun warn w") => ../tests/test.rem(749): Trig = Sunday, 17 February, 1991 +trig("sun warn w") => ../tests/test.rem(750): Trig = Sunday, 17 February, 1991 Entering UserFN w(1) x => 1 choose(1, 5, 3, 1, 0) => 5 @@ -3829,7 +3832,7 @@ x => 3 choose(3, 5, 3, 1, 0) => 1 Leaving UserFN w() => 1 1991-02-17 -trig("thu warn w") => ../tests/test.rem(749): Trig = Thursday, 21 February, 1991 +trig("thu warn w") => ../tests/test.rem(750): Trig = Thursday, 21 February, 1991 Entering UserFN w(1) x => 1 choose(1, 5, 3, 1, 0) => 5 @@ -3838,92 +3841,92 @@ Leaving UserFN w() => 5 1991-02-17 || 1991-02-21 => 1991-02-17 REM [trig()] +5 MSG Foo %b trig() => 1991-02-21 -../tests/test.rem(750): Trig = Thursday, 21 February, 1991 +../tests/test.rem(751): Trig = Thursday, 21 February, 1991 Foo in 5 days' time ENDIF REM [trig("Mon", "Tue", "Wed", "Sat")] MSG foo -trig("Mon", "Tue", "Wed", "Sat") => ../tests/test.rem(753): Trig = Monday, 18 February, 1991 -../tests/test.rem(753): Trig = Tuesday, 19 February, 1991 -../tests/test.rem(753): Trig = Wednesday, 20 February, 1991 -../tests/test.rem(753): Trig = Saturday, 16 February, 1991 +trig("Mon", "Tue", "Wed", "Sat") => ../tests/test.rem(754): Trig = Monday, 18 February, 1991 +../tests/test.rem(754): Trig = Tuesday, 19 February, 1991 +../tests/test.rem(754): Trig = Wednesday, 20 February, 1991 +../tests/test.rem(754): Trig = Saturday, 16 February, 1991 1991-02-16 -../tests/test.rem(753): Trig = Saturday, 16 February, 1991 +../tests/test.rem(754): Trig = Saturday, 16 February, 1991 foo REM [trig("Mon", "Tue", "Wed")] MSG bar -trig("Mon", "Tue", "Wed") => ../tests/test.rem(754): Trig = Monday, 18 February, 1991 -../tests/test.rem(754): Trig = Tuesday, 19 February, 1991 -../tests/test.rem(754): Trig = Wednesday, 20 February, 1991 +trig("Mon", "Tue", "Wed") => ../tests/test.rem(755): Trig = Monday, 18 February, 1991 +../tests/test.rem(755): Trig = Tuesday, 19 February, 1991 +../tests/test.rem(755): Trig = Wednesday, 20 February, 1991 1990-01-01 -../tests/test.rem(754): Expired +../tests/test.rem(755): Expired # The new syntactic sugar REM First Monday January MSG x -../tests/test.rem(757): Trig = Monday, 6 January, 1992 +../tests/test.rem(758): Trig = Monday, 6 January, 1992 REM Second Tuesday in April MSG x -../tests/test.rem(758): Trig = Tuesday, 9 April, 1991 +../tests/test.rem(759): Trig = Tuesday, 9 April, 1991 REM Third Wednesday in October MSG x -../tests/test.rem(759): Trig = Wednesday, 16 October, 1991 +../tests/test.rem(760): Trig = Wednesday, 16 October, 1991 REM Fourth Friday in July MSG x -../tests/test.rem(760): Trig = Friday, 26 July, 1991 +../tests/test.rem(761): Trig = Friday, 26 July, 1991 REM Last Tuesday in August MSG x -../tests/test.rem(761): Trig = Tuesday, 27 August, 1991 +../tests/test.rem(762): Trig = Tuesday, 27 August, 1991 REM Last Sunday in December MSG x -../tests/test.rem(762): Trig = Sunday, 29 December, 1991 +../tests/test.rem(763): Trig = Sunday, 29 December, 1991 REM First Monday January 2000 MSG x -../tests/test.rem(764): Trig = Monday, 3 January, 2000 +../tests/test.rem(765): Trig = Monday, 3 January, 2000 REM Second Tuesday in April 2000 MSG x -../tests/test.rem(765): Trig = Tuesday, 11 April, 2000 +../tests/test.rem(766): Trig = Tuesday, 11 April, 2000 REM Third Wednesday in October 2000 MSG x -../tests/test.rem(766): Trig = Wednesday, 18 October, 2000 +../tests/test.rem(767): Trig = Wednesday, 18 October, 2000 REM Fourth Friday in July 2000 MSG x -../tests/test.rem(767): Trig = Friday, 28 July, 2000 +../tests/test.rem(768): Trig = Friday, 28 July, 2000 REM Last Tuesday in August 2000 MSG x -../tests/test.rem(768): Trig = Tuesday, 29 August, 2000 +../tests/test.rem(769): Trig = Tuesday, 29 August, 2000 REM Last Sunday in December 2000 MSG x -../tests/test.rem(769): Trig = Sunday, 31 December, 2000 +../tests/test.rem(770): Trig = Sunday, 31 December, 2000 REM January ~~1 MSG y -../tests/test.rem(771): Trig = Friday, 31 January, 1992 +../tests/test.rem(772): Trig = Friday, 31 January, 1992 REM February ~~1 MSG y -../tests/test.rem(772): Trig = Thursday, 28 February, 1991 +../tests/test.rem(773): Trig = Thursday, 28 February, 1991 REM February ~~2 MSG y -../tests/test.rem(773): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(774): Trig = Wednesday, 27 February, 1991 REM February ~~3 MSG y -../tests/test.rem(774): Trig = Tuesday, 26 February, 1991 +../tests/test.rem(775): Trig = Tuesday, 26 February, 1991 REM February ~~8 MSG y -../tests/test.rem(775): Trig = Thursday, 21 February, 1991 +../tests/test.rem(776): Trig = Thursday, 21 February, 1991 REM February ~~20 MSG y -../tests/test.rem(776): Trig = Monday, 10 February, 1992 +../tests/test.rem(777): Trig = Monday, 10 February, 1992 PUSH OMIT 31 March REM March ~1 MSG y -../tests/test.rem(779): Trig = Saturday, 30 March, 1991 +../tests/test.rem(780): Trig = Saturday, 30 March, 1991 REM March ~~1 MSG y -../tests/test.rem(780): Trig = Sunday, 31 March, 1991 -REM Lastday March MSG y ../tests/test.rem(781): Trig = Sunday, 31 March, 1991 +REM Lastday March MSG y +../tests/test.rem(782): Trig = Sunday, 31 March, 1991 REM Lastworkday March MSG y -../tests/test.rem(782): Trig = Saturday, 30 March, 1991 +../tests/test.rem(783): Trig = Saturday, 30 March, 1991 POP REM Dec 2000 ~~1 MSG y -../tests/test.rem(784): Trig = Sunday, 31 December, 2000 +../tests/test.rem(785): Trig = Sunday, 31 December, 2000 REM Dec 2000 ~~2 MSG y -../tests/test.rem(785): Trig = Saturday, 30 December, 2000 +../tests/test.rem(786): Trig = Saturday, 30 December, 2000 REM Dec 2000 ~~3 MSG y -../tests/test.rem(786): Trig = Friday, 29 December, 2000 +../tests/test.rem(787): Trig = Friday, 29 December, 2000 REM Dec 2000 ~~7 MSG y -../tests/test.rem(787): Trig = Monday, 25 December, 2000 +../tests/test.rem(788): Trig = Monday, 25 December, 2000 REM Jan 2001 ~~1 MSG y -../tests/test.rem(788): Trig = Wednesday, 31 January, 2001 +../tests/test.rem(789): Trig = Wednesday, 31 January, 2001 REM Lastday April 2022 OMIT SAT SUN MSG foo -../tests/test.rem(790): Trig = Saturday, 30 April, 2022 +../tests/test.rem(791): Trig = Saturday, 30 April, 2022 REM Lastworkday April 2022 OMIT SAT SUN MSG foo -../tests/test.rem(791): Trig = Friday, 29 April, 2022 +../tests/test.rem(792): Trig = Friday, 29 April, 2022 SET a pad(1, "0", 2) pad(1, "0", 2) => "01" @@ -3941,7 +3944,7 @@ set a pad("foo", "0", $MaxStringLen+1) $MaxStringLen => 65535 65535 + 1 => 65536 pad("foo", "0", 65536) => String too long -../tests/test.rem(799): String too long +../tests/test.rem(800): String too long # Test OMIT CLEAR-OMIT-CONTEXT @@ -3951,7 +3954,7 @@ OMIT Jun THROUGH July 15 OMIT Sep 5 THROUGH Sep 10 OMIT 2024-12-25 THROUGH 2025-01-04 OMIT Apr 2022 through July -../tests/test.rem(808): Bad date specification +../tests/test.rem(809): Bad date specification OMIT DUMP Global Full OMITs (11 of maximum allowed 1000): @@ -4050,10 +4053,10 @@ Global Partial OMITs (81 of maximum allowed 366): 09-10 CLEAR-OMIT-CONTEXT OMIT 2000-01-01 THROUGH 2020-12-31 -../tests/test.rem(812): Too many full OMITs +../tests/test.rem(813): Too many full OMITs OMIT Dec 5 2029 through Dec 4 2029 -../tests/test.rem(814): Error: THROUGH date earlier than start date +../tests/test.rem(815): Error: THROUGH date earlier than start date # Don't want Remind to queue reminders EXIT @@ -7815,6 +7818,8 @@ February 29 ] } ] +STDOUT is a: FILE +STDOUT is a: PIPE +----------------------------------------------------------------------------+ | January 2020‎ | +----------+----------+----------+----------+----------+----------+----------+ diff --git a/tests/test.rem b/tests/test.rem index 93baeb6b..c7e82a4a 100644 --- a/tests/test.rem +++ b/tests/test.rem @@ -436,6 +436,7 @@ set a132 trigdatetime() set a133 trigduration() set a134 trigeventstart() set a135 trigeventduration() +set a136 stdout() # These will issue errors REM Mon OMIT Mon SKIP MSG Never ever ever...