diff --git a/man/remind.1.in b/man/remind.1.in index d99b821e..969d2e0e 100644 --- a/man/remind.1.in +++ b/man/remind.1.in @@ -1562,6 +1562,10 @@ In addition to being a keyword in the \fBREM\fR command, \fBOMIT\fR is a command in its own right. Its syntax is: .PP .RS +\fBOMIT\fR \fIweekday\fR [\fIweekday\fR...] +.PP +or: +.PP \fBOMIT\fR [\fIday\fR] \fImonth\fR [\fIyear\fR] .PP or: @@ -1575,6 +1579,7 @@ The \fBOMIT\fR command is used to "globally" omit certain days "\-\-" and "\+\+" forms. Some examples: .PP .nf + OMIT Saturday Sunday OMIT 1 Jan OMIT 7 Sep 1992 OMIT 15 Jan THROUGH 14 Feb @@ -1584,8 +1589,13 @@ The \fBOMIT\fR command is used to "globally" omit certain days OMIT Jun THROUGH July # Equivalent to OMIT Jun 1 THROUGH July 31 .fi .PP -The first example specifies a holiday that occurs on the same date each -year - New Year's Day. The second example specifies a holiday that +The first example omits every Saturday and Sunday. This is useful for +reminders that shouldn't trigger on weekends. +.PP +The second example specifies a holiday that occurs on the same date each +year - New Year's Day. +.PP +The third example specifies a holiday that changes each year - Labour Day. For these types of holidays, you must create an \fBOMIT\fR command for each year. (Later, in the description of expressions and some of the more advanced features of diff --git a/src/funcs.c b/src/funcs.c index a71ab6db..d642a512 100644 --- a/src/funcs.c +++ b/src/funcs.c @@ -3004,11 +3004,11 @@ FSlide(func_info *info) } /* If ALL weekdays are omitted... barf! */ - if (localomit == 127 && amt != 0) return E_2MANY_LOCALOMIT; + if ((WeekdayOmits | localomit) == 0x7F && amt != 0) return E_2MANY_LOCALOMIT; if (amt > 0) { while(amt) { d++; - r = IsOmitted(d, localomit, NULL,&omit); + r = IsOmitted(d, localomit, NULL, &omit); if (r) return r; if (!omit) amt--; } @@ -3016,7 +3016,7 @@ FSlide(func_info *info) while(amt) { d--; if (d < 0) return E_DATE_OVER; - r = IsOmitted(d, localomit, NULL,&omit); + r = IsOmitted(d, localomit, NULL, &omit); if (r) return r; if (!omit) amt++; } diff --git a/src/globals.h b/src/globals.h index a22f3758..308b8d64 100644 --- a/src/globals.h +++ b/src/globals.h @@ -80,6 +80,7 @@ EXTERN INIT( long SysTime, -1L); EXTERN char const *InitialFile; EXTERN int FileAccessDate; +EXTERN INIT( int WeekdayOmits, 0); EXTERN INIT( int DontSuppressQuoteMarkers, 0); EXTERN INIT( int DontFork, 0); EXTERN INIT( int DontQueue, 0); diff --git a/src/omit.c b/src/omit.c index 1c28272d..aadc3764 100644 --- a/src/omit.c +++ b/src/omit.c @@ -28,6 +28,8 @@ static void InsertIntoSortedArray (int *array, int num, int key); static int FullOmitArray[MAX_FULL_OMITS]; static int PartialOmitArray[MAX_PARTIAL_OMITS]; +/* WeekdayOmits is declared in global.h */ + /* How many of each omit types do we have? */ static int NumFullOmits, NumPartialOmits; @@ -37,6 +39,7 @@ typedef struct omitcontext { int numfull, numpart; int *fullsave; int *partsave; + int weekdaysave; } OmitContext; /* The stack of saved omit contexts */ @@ -52,6 +55,7 @@ static OmitContext *SavedOmitContexts = NULL; int ClearGlobalOmits(void) { NumFullOmits = NumPartialOmits = 0; + WeekdayOmits = 0; return OK; } @@ -113,6 +117,7 @@ int PushOmitContext(ParsePtr p) context->numfull = NumFullOmits; context->numpart = NumPartialOmits; + context->weekdaysave = WeekdayOmits; context->fullsave = malloc(NumFullOmits * sizeof(int)); if (NumFullOmits && !context->fullsave) { free(context); @@ -154,6 +159,7 @@ int PopOmitContext(ParsePtr p) if (!c) return E_POP_NO_PUSH; NumFullOmits = c->numfull; NumPartialOmits = c->numpart; + WeekdayOmits = c->weekdaysave; /* Copy the context over */ for (i=0; ilocalomit == 1 + 2 + 4 + 8 + 16 + 32 + 64) { + if ((WeekdayOmits | trig->localomit) == 0x7F) { *err = E_2MANY_LOCALOMIT; return -1; } diff --git a/tests/test.cmp b/tests/test.cmp index 8d25f1d6..a99fb2e7 100644 --- a/tests/test.cmp +++ b/tests/test.cmp @@ -530,112 +530,120 @@ REM Tue 28 Jan 1992 MSG Tue 28 Jan 1992 # Try some Backs CLEAR-OMIT-CONTEXT -REM 1 -1 OMIT sat sun MSG 1 -1 OMIT Sat Sun -../tests/test.rem(149): Trig = Thursday, 28 February, 1991 -REM 1 --1 OMIT sat sun MSG 1 --1 OMIT Sat Sun +REM 1 -1 OMIT thu MSG 1 -1 OMIT Thu +../tests/test.rem(149): Trig = Wednesday, 27 February, 1991 +REM 1 --1 OMIT thu MSG 1 --1 OMIT Thu ../tests/test.rem(150): Trig = Thursday, 28 February, 1991 +PUSH-OMIT-CONTEXT +OMIT Thu +REM 1 -1 MSG 1 -1 OMIT Thu globally +../tests/test.rem(154): Trig = Wednesday, 27 February, 1991 +REM 1 --1 MSG 1 --1 OMIT Thu globally +../tests/test.rem(155): Trig = Thursday, 28 February, 1991 +POP-OMIT-CONTEXT + OMIT 28 Feb REM 1 -1 OMIT sat sun MSG 1 -1 OMIT Sat Sun (28 Feb omitted) -../tests/test.rem(153): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(159): Trig = Wednesday, 27 February, 1991 REM 1 --1 OMIT sat sun MSG 1 --1 OMIT Sat Sun (28 Feb omitted) -../tests/test.rem(154): Trig = Thursday, 28 February, 1991 +../tests/test.rem(160): Trig = Thursday, 28 February, 1991 CLEAR-OMIT-CONTEXT # Try out UNTIL REM Wed UNTIL 21 Feb 1991 MSG Wed UNTIL 21 Feb 1991 -../tests/test.rem(159): Trig = Wednesday, 20 February, 1991 +../tests/test.rem(165): Trig = Wednesday, 20 February, 1991 # Try playing with the OMIT context OMIT 28 Feb 1991 REM 1 Mar -1 MSG 1 mar -1 (28feb91 omitted) -../tests/test.rem(164): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(170): Trig = Wednesday, 27 February, 1991 REM 1 Mar --1 MSG 1 mar --1 (28Feb91 omitted) -../tests/test.rem(165): Trig = Thursday, 28 February, 1991 +../tests/test.rem(171): Trig = Thursday, 28 February, 1991 REM 28 Feb BEFORE MSG 28 Feb BEFORE (28Feb91 omitted) -../tests/test.rem(166): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(172): Trig = Wednesday, 27 February, 1991 REM 28 Feb SKIP MSG 28 Feb SKIP (28Feb91 omitted) -../tests/test.rem(167): Trig = Friday, 28 February, 1992 +../tests/test.rem(173): Trig = Friday, 28 February, 1992 REM 28 Feb AFTER MSG 28 Feb AFTER (28Feb91 omitted) -../tests/test.rem(168): Trig = Friday, 1 March, 1991 +../tests/test.rem(174): Trig = Friday, 1 March, 1991 PUSH-OMIT-CONTEXT CLEAR-OMIT-CONTEXT REM 1 Mar -1 MSG 1 mar -1 -../tests/test.rem(172): Trig = Thursday, 28 February, 1991 +../tests/test.rem(178): Trig = Thursday, 28 February, 1991 REM 1 Mar --1 MSG 1 mar --1 -../tests/test.rem(173): Trig = Thursday, 28 February, 1991 +../tests/test.rem(179): Trig = Thursday, 28 February, 1991 REM 28 Feb BEFORE MSG 28 Feb BEFORE -../tests/test.rem(174): Trig = Thursday, 28 February, 1991 +../tests/test.rem(180): Trig = Thursday, 28 February, 1991 REM 28 Feb SKIP MSG 28 Feb SKIP -../tests/test.rem(175): Trig = Thursday, 28 February, 1991 +../tests/test.rem(181): Trig = Thursday, 28 February, 1991 REM 28 Feb AFTER MSG 28 Feb AFTER -../tests/test.rem(176): Trig = Thursday, 28 February, 1991 +../tests/test.rem(182): Trig = Thursday, 28 February, 1991 POP-OMIT-CONTEXT REM 1 Mar -1 MSG 1 mar -1 (28feb91 omitted) -../tests/test.rem(179): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(185): Trig = Wednesday, 27 February, 1991 REM 1 Mar --1 MSG 1 mar --1 (28Feb91 omitted) -../tests/test.rem(180): Trig = Thursday, 28 February, 1991 +../tests/test.rem(186): Trig = Thursday, 28 February, 1991 REM 28 Feb BEFORE MSG 28 Feb BEFORE (28Feb91 omitted) -../tests/test.rem(181): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(187): Trig = Wednesday, 27 February, 1991 REM 28 Feb SKIP MSG 28 Feb SKIP (28Feb91 omitted) -../tests/test.rem(182): Trig = Friday, 28 February, 1992 +../tests/test.rem(188): Trig = Friday, 28 February, 1992 REM 28 Feb AFTER MSG 28 Feb AFTER (28Feb91 omitted) -../tests/test.rem(183): Trig = Friday, 1 March, 1991 +../tests/test.rem(189): Trig = Friday, 1 March, 1991 REM 13 March 1991 *1 UNTIL 19 March 1991 MSG 13-19 Mar 91 -../tests/test.rem(186): Trig = Wednesday, 13 March, 1991 +../tests/test.rem(192): Trig = Wednesday, 13 March, 1991 # Test BACK CLEAR-OMIT-CONTEXT REM 18 Feb 1991 +1 MSG 18 Feb 1991 +1 -../tests/test.rem(190): Trig = Monday, 18 February, 1991 +../tests/test.rem(196): Trig = Monday, 18 February, 1991 OMIT 17 Feb 1991 REM 18 Feb 1991 +1 MSG 18 Feb 1991 +1 (17Feb91 omitted) -../tests/test.rem(193): Trig = Monday, 18 February, 1991 +../tests/test.rem(199): Trig = Monday, 18 February, 1991 18 Feb 1991 +1 (17Feb91 omitted) REM 18 Feb 1991 ++1 MSG 18 Feb 1991 ++1 (17Feb91 omitted) -../tests/test.rem(194): Trig = Monday, 18 February, 1991 +../tests/test.rem(200): Trig = Monday, 18 February, 1991 CLEAR-OMIT-CONTEXT # Test the scanfrom clause REM Fri SATISFY 1 -../tests/test.rem(198): Trig = Friday, 22 February, 1991 -../tests/test.rem(198): Trig(satisfied) = Friday, 22 February, 1991 +../tests/test.rem(204): Trig = Friday, 22 February, 1991 +../tests/test.rem(204): Trig(satisfied) = Friday, 22 February, 1991 OMIT [trigger(trigdate())] trigdate() => 1991-02-22 trigger(1991-02-22) => "22 February 1991" REM Fri after MSG 23 Feb 1991 -../tests/test.rem(200): Trig = Saturday, 23 February, 1991 +../tests/test.rem(206): Trig = Saturday, 23 February, 1991 CLEAR-OMIT-CONTEXT REM Fri SCANFROM [trigger(today()-7)] SATISFY 1 today() => 1991-02-16 1991-02-16 - 7 => 1991-02-09 trigger(1991-02-09) => "9 February 1991" -../tests/test.rem(202): Trig = Friday, 15 February, 1991 -../tests/test.rem(202): Trig(satisfied) = Friday, 15 February, 1991 +../tests/test.rem(208): Trig = Friday, 15 February, 1991 +../tests/test.rem(208): Trig(satisfied) = Friday, 15 February, 1991 OMIT [trigger(trigdate())] trigdate() => 1991-02-15 trigger(1991-02-15) => "15 February 1991" REM Fri after MSG 16 Feb 1991 -../tests/test.rem(204): Trig = Saturday, 16 February, 1991 +../tests/test.rem(210): Trig = Saturday, 16 February, 1991 16 Feb 1991 CLEAR-OMIT-CONTEXT REM Fri SCANFROM -7 SATISFY 1 -../tests/test.rem(206): Trig = Friday, 15 February, 1991 -../tests/test.rem(206): Trig(satisfied) = Friday, 15 February, 1991 +../tests/test.rem(212): Trig = Friday, 15 February, 1991 +../tests/test.rem(212): Trig(satisfied) = Friday, 15 February, 1991 OMIT [trigger(trigdate())] trigdate() => 1991-02-15 trigger(1991-02-15) => "15 February 1991" REM Fri after MSG 16 Feb 1991 -../tests/test.rem(208): Trig = Saturday, 16 February, 1991 +../tests/test.rem(214): Trig = Saturday, 16 February, 1991 16 Feb 1991 CLEAR-OMIT-CONTEXT @@ -733,7 +741,7 @@ day(1991-03-08) => 8 8 % 2 => 0 0 || 0 => 0 Leaving UserFN _ofunc() => 0 -../tests/test.rem(213): Trig = Friday, 8 March, 1991 +../tests/test.rem(219): Trig = Friday, 8 March, 1991 REM 8 March OMITFUNC _ofunc -1 MSG OmitFunc Test 2 Entering UserFN _ofunc(1991-03-07) x => 1991-03-07 @@ -807,44 +815,46 @@ day(1991-02-28) => 28 28 % 2 => 0 0 || 0 => 0 Leaving UserFN _ofunc() => 0 -../tests/test.rem(214): Trig = Thursday, 28 February, 1991 +../tests/test.rem(220): Trig = Thursday, 28 February, 1991 # omitfunc ignores local/global omits fset _ofunc(x) 0 OMIT 1 March OMIT 2 March 1991 REM 1 March OMIT Sun OMITFUNC _ofunc AFTER MSG Should trigger 1 March -../tests/test.rem(220): Warning: OMIT is ignored if you use OMITFUNC +../tests/test.rem(226): Warning: OMIT is ignored if you use OMITFUNC Entering UserFN _ofunc(1991-02-15) Leaving UserFN _ofunc() => 0 Entering UserFN _ofunc(1991-03-01) Leaving UserFN _ofunc() => 0 -../tests/test.rem(220): Trig = Friday, 1 March, 1991 +../tests/test.rem(226): Trig = Friday, 1 March, 1991 REM 1 March OMIT Sun AFTER MSG Should trigger 4 March -../tests/test.rem(221): Trig = Monday, 4 March, 1991 +../tests/test.rem(227): Trig = Monday, 4 March, 1991 # Test shorthand reminders REM 1991-02-28 MSG Feb 28 -../tests/test.rem(224): Trig = Thursday, 28 February, 1991 +../tests/test.rem(230): Trig = Thursday, 28 February, 1991 REM 1991/02/28@14:45 MSG Feb 28 -../tests/test.rem(225): Trig = Thursday, 28 February, 1991 AT 14:45 +../tests/test.rem(231): Trig = Thursday, 28 February, 1991 AT 14:45 REM Wed UNTIL 1991-01-01 MSG Expired -../tests/test.rem(226): Expired +../tests/test.rem(232): Expired REM Wed SCANFROM 1991-02-26 MSG SCANFROM -../tests/test.rem(227): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(233): Trig = Wednesday, 27 February, 1991 CLEAR-OMIT-CONTEXT # Test ADDOMIT REM Mon 15 Feb ADDOMIT MSG Family Day -../tests/test.rem(232): Trig = Monday, 18 February, 1991 +../tests/test.rem(238): Trig = Monday, 18 February, 1991 REM Feb 18 AFTER MSG Should trigger on Feb 19 -../tests/test.rem(233): Trig = Tuesday, 19 February, 1991 +../tests/test.rem(239): Trig = Tuesday, 19 February, 1991 OMIT DUMP Global Full OMITs (1 of maximum allowed 1000): 1991-02-18 Global Partial OMITs (0 of maximum allowed 366): None. +Globally omitted weekdays: + None. set $CalcUTC 0 set $DateTimeSep "@" @@ -896,7 +906,7 @@ set a008 coerce("string", 11:44) coerce("string", 11:44) => "11:44" set a009 coerce("int", "badnews") coerce("int", "badnews") => Can't coerce -../tests/test.rem(268): Can't coerce +../tests/test.rem(274): Can't coerce set a010 coerce("int", "12") coerce("int", "12") => 12 set a011 coerce("int", 11:44) @@ -908,7 +918,7 @@ set a013 date(1992, 2, 2) date(1992, 2, 2) => 1992-02-02 set a014 date(1993, 2, 29) date(1993, 2, 29) => Bad date specification -../tests/test.rem(273): Bad date specification +../tests/test.rem(279): Bad date specification set a015 day(today()) today() => 1991-02-16 day(1991-02-16) => 16 @@ -1003,15 +1013,15 @@ strlen("sadjflkhsldkfhsdlfjhk") => 21 set a050 substr(a049, 2) a049 => 21 substr(21, 2) => Type mismatch -../tests/test.rem(311): Type mismatch +../tests/test.rem(317): Type mismatch set a051 substr(a050, 2, 6) -a050 => ../tests/test.rem(312): Undefined variable: a050 +a050 => ../tests/test.rem(318): Undefined variable: a050 set a052 time(1+2, 3+4) 1 + 2 => 3 3 + 4 => 7 time(3, 7) => 03:07 rem 10 jan 1992 AT 11:22 CAL -../tests/test.rem(314): Trig = Friday, 10 January, 1992 AT 11:22 +../tests/test.rem(320): Trig = Friday, 10 January, 1992 AT 11:22 set a053 trigdate() trigdate() => 1992-01-10 set a054 trigtime() @@ -1103,97 +1113,97 @@ y => 11:33 x => "foo" y => 11:33 "foo" * 11:33 => Type mismatch -../tests/test.rem(337): -../tests/test.rem(334): In function `h': `*': Type mismatch +../tests/test.rem(343): +../tests/test.rem(340): In function `h': `*': Type mismatch Leaving UserFN h() => Type mismatch set a074 dosubst("%a %b %c %d %e %f %g %h", '1992/5/5') dosubst("%a %b %c %d %e %f %g %h", 1992-05-05) => "on Tuesday, 5 May, 1992 in 444 days' tim"... msg [a074]% -../tests/test.rem(339): Trig = Saturday, 16 February, 1991 +../tests/test.rem(345): Trig = Saturday, 16 February, 1991 a074 => "on Tuesday, 5 May, 1992 in 444 days' tim"... on Tuesday, 5 May, 1992 in 444 days' time on Tuesday 5 on 05-05-1992 on 05-05-1992 on Tuesday, 5 May on 05-05 set a075 dosubst("%i %j %k %l %m %n %o %p", '1992/5/5') dosubst("%i %j %k %l %m %n %o %p", 1992-05-05) => "on 05-05 on Tuesday, May 5th, 1992 on Tu"... msg [a075]% -../tests/test.rem(341): Trig = Saturday, 16 February, 1991 +../tests/test.rem(347): Trig = Saturday, 16 February, 1991 a075 => "on 05-05 on Tuesday, May 5th, 1992 on Tu"... on 05-05 on Tuesday, May 5th, 1992 on Tuesday, May 5th on 1992-05-05 May 5 s set a076 dosubst("%q %r %s %t %u %v %w %x", '1992/5/5') dosubst("%q %r %s %t %u %v %w %x", 1992-05-05) => "s' 05 th 05 on Tuesday, 5th May, 1992 on"... msg [a076]% -../tests/test.rem(343): Trig = Saturday, 16 February, 1991 +../tests/test.rem(349): Trig = Saturday, 16 February, 1991 a076 => "s' 05 th 05 on Tuesday, 5th May, 1992 on"... s' 05 th 05 on Tuesday, 5th May, 1992 on Tuesday, 5th May Tuesday 444 set a074 dosubst("%*a %*b %*c %*d %*e %*f %*g %*h", '1992/5/5') dosubst("%*a %*b %*c %*d %*e %*f %*g %*h", 1992-05-05) => "Tuesday, 5 May, 1992 in 444 days' time T"... msg [a074]% -../tests/test.rem(345): Trig = Saturday, 16 February, 1991 +../tests/test.rem(351): Trig = Saturday, 16 February, 1991 a074 => "Tuesday, 5 May, 1992 in 444 days' time T"... Tuesday, 5 May, 1992 in 444 days' time Tuesday 5 05-05-1992 05-05-1992 Tuesday, 5 May 05-05 set a075 dosubst("%*i %*j %*k %*l %*m %*n %*o %*p", '1992/5/5') dosubst("%*i %*j %*k %*l %*m %*n %*o %*p", 1992-05-05) => "05-05 Tuesday, May 5th, 1992 Tuesday, Ma"... msg [a075]% -../tests/test.rem(347): Trig = Saturday, 16 February, 1991 +../tests/test.rem(353): Trig = Saturday, 16 February, 1991 a075 => "05-05 Tuesday, May 5th, 1992 Tuesday, Ma"... 05-05 Tuesday, May 5th, 1992 Tuesday, May 5th 1992-05-05 May 5 s set a076 dosubst("%*q %*r %*s %*t %*u %*v %*w %*x", '1992/5/5') dosubst("%*q %*r %*s %*t %*u %*v %*w %*x", 1992-05-05) => "s' 05 th 05 Tuesday, 5th May, 1992 Tuesd"... msg [a076]% -../tests/test.rem(349): Trig = Saturday, 16 February, 1991 +../tests/test.rem(355): Trig = Saturday, 16 February, 1991 a076 => "s' 05 th 05 Tuesday, 5th May, 1992 Tuesd"... s' 05 th 05 Tuesday, 5th May, 1992 Tuesday, 5th May Tuesday 444 set a077 dosubst("%*y %*z", '1992/5/5') dosubst("%*y %*z", 1992-05-05) => "1992 92\n" msg [a077]% -../tests/test.rem(351): Trig = Saturday, 16 February, 1991 +../tests/test.rem(357): Trig = Saturday, 16 February, 1991 a077 => "1992 92\n" 1992 92 set a074 dosubst("%A %B %C %D %E %F %G %H", '1992/5/5') dosubst("%A %B %C %D %E %F %G %H", 1992-05-05) => "On Tuesday, 5 May, 1992 In 444 days' tim"... msg [a074]% -../tests/test.rem(353): Trig = Saturday, 16 February, 1991 +../tests/test.rem(359): Trig = Saturday, 16 February, 1991 a074 => "On Tuesday, 5 May, 1992 In 444 days' tim"... On Tuesday, 5 May, 1992 In 444 days' time On Tuesday 5 On 05-05-1992 On 05-05-1992 On Tuesday, 5 May On 05-05 set a075 dosubst("%I %J %K %L %M %N %O %P", '1992/5/5') dosubst("%I %J %K %L %M %N %O %P", 1992-05-05) => "On 05-05 On Tuesday, May 5th, 1992 On Tu"... msg [a075]% -../tests/test.rem(355): Trig = Saturday, 16 February, 1991 +../tests/test.rem(361): Trig = Saturday, 16 February, 1991 a075 => "On 05-05 On Tuesday, May 5th, 1992 On Tu"... On 05-05 On Tuesday, May 5th, 1992 On Tuesday, May 5th On 1992-05-05 May 5 S set a076 dosubst("%Q %R %S %T %U %V %W %X", '1992/5/5') dosubst("%Q %R %S %T %U %V %W %X", 1992-05-05) => "S' 05 Th 05 On Tuesday, 5th May, 1992 On"... msg [a076]% -../tests/test.rem(357): Trig = Saturday, 16 February, 1991 +../tests/test.rem(363): Trig = Saturday, 16 February, 1991 a076 => "S' 05 Th 05 On Tuesday, 5th May, 1992 On"... S' 05 Th 05 On Tuesday, 5th May, 1992 On Tuesday, 5th May Tuesday 444 set a077 dosubst("%Y %Z", '1992/5/5') dosubst("%Y %Z", 1992-05-05) => "1992 92\n" msg [a077]% -../tests/test.rem(359): Trig = Saturday, 16 February, 1991 +../tests/test.rem(365): Trig = Saturday, 16 February, 1991 a077 => "1992 92\n" 1992 92 set a074 dosubst("%*A %*B %*C %*D %*E %*F %*G %*H", '1992/5/5') dosubst("%*A %*B %*C %*D %*E %*F %*G %*H", 1992-05-05) => "Tuesday, 5 May, 1992 In 444 days' time T"... msg [a074]% -../tests/test.rem(361): Trig = Saturday, 16 February, 1991 +../tests/test.rem(367): Trig = Saturday, 16 February, 1991 a074 => "Tuesday, 5 May, 1992 In 444 days' time T"... Tuesday, 5 May, 1992 In 444 days' time Tuesday 5 05-05-1992 05-05-1992 Tuesday, 5 May 05-05 set a075 dosubst("%*I %*J %*K %*L %*M %*N %*O %*P", '1992/5/5') dosubst("%*I %*J %*K %*L %*M %*N %*O %*P", 1992-05-05) => "05-05 Tuesday, May 5th, 1992 Tuesday, Ma"... msg [a075]% -../tests/test.rem(363): Trig = Saturday, 16 February, 1991 +../tests/test.rem(369): Trig = Saturday, 16 February, 1991 a075 => "05-05 Tuesday, May 5th, 1992 Tuesday, Ma"... 05-05 Tuesday, May 5th, 1992 Tuesday, May 5th 1992-05-05 May 5 S set a076 dosubst("%*Q %*R %*S %*T %*U %*V %*W %*X", '1992/5/5') dosubst("%*Q %*R %*S %*T %*U %*V %*W %*X", 1992-05-05) => "S' 05 Th 05 Tuesday, 5th May, 1992 Tuesd"... msg [a076]% -../tests/test.rem(365): Trig = Saturday, 16 February, 1991 +../tests/test.rem(371): Trig = Saturday, 16 February, 1991 a076 => "S' 05 Th 05 Tuesday, 5th May, 1992 Tuesd"... S' 05 Th 05 Tuesday, 5th May, 1992 Tuesday, 5th May Tuesday 444 set a077 dosubst("%*Y %*Z", '1992/5/5') dosubst("%*Y %*Z", 1992-05-05) => "1992 92\n" msg [a077]% -../tests/test.rem(367): Trig = Saturday, 16 February, 1991 +../tests/test.rem(373): Trig = Saturday, 16 February, 1991 a077 => "1992 92\n" 1992 92 set a078 easterdate(today()) @@ -1215,7 +1225,7 @@ nonomitted(1991-03-01, 1991-03-13, "Sat", "Sun") => 7 set a085 nonomitted('1991-03-24', '1991-04-01', "Sat") nonomitted(1991-03-24, 1991-04-01, "Sat") => 7 REM 2010-09-03 +3 -4 UNTIL 2012-01-01 PRIORITY 7 *14 MSG foo -../tests/test.rem(377): Trig = Monday, 30 August, 2010 +../tests/test.rem(383): Trig = Monday, 30 August, 2010 set a086 trigback() trigback() => 4 set a087 trigdelta() @@ -1238,7 +1248,7 @@ set a095 trigduration() trigduration() => -1 REM Mon Wed FROM 2010-09-03 ++3 --4 MSG foo -../tests/test.rem(389): Trig = Saturday, 4 September, 2010 +../tests/test.rem(395): Trig = Saturday, 4 September, 2010 set a096 trigback() trigback() => -4 set a097 trigdelta() @@ -1261,7 +1271,7 @@ set a105 trigduration() trigduration() => -1 REM 2010-09-03 +3 -4 UNTIL 2012-01-01 PRIORITY 7 *14 AT 14:41 +15 *2 DURATION 213 MSG foo -../tests/test.rem(401): Trig = Monday, 30 August, 2010 AT 14:41 DURATION 03:33 +../tests/test.rem(407): Trig = Monday, 30 August, 2010 AT 14:41 DURATION 03:33 set a106 trigback() trigback() => 4 set a107 trigdelta() @@ -1284,7 +1294,7 @@ set a115 trigduration() trigduration() => 03:33 REM Mon Wed FROM 2010-09-03 ++3 --4 AT 14:44 MSG foo -../tests/test.rem(413): Trig = Saturday, 4 September, 2010 AT 14:44 +../tests/test.rem(419): Trig = Saturday, 4 September, 2010 AT 14:44 set a116 trigback() trigback() => -4 set a117 trigdelta() @@ -1318,9 +1328,9 @@ set a129 23:30 + '2019-02-02@16:44' # Multi-day reminder REM 13 AT 16:00 DURATION 72:00 MSG 72-hour event -../tests/test.rem(432): Trig = Wednesday, 13 March, 1991 AT 16:00 DURATION 72:00 -../tests/test.rem(432): Trig = Wednesday, 13 February, 1991 AT 16:00 DURATION 72:00 -../tests/test.rem(432): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 16:00 +../tests/test.rem(438): Trig = Wednesday, 13 March, 1991 AT 16:00 DURATION 72:00 +../tests/test.rem(438): Trig = Wednesday, 13 February, 1991 AT 16:00 DURATION 72:00 +../tests/test.rem(438): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 16:00 72-hour event set a130 trigdate() @@ -1340,1210 +1350,1210 @@ stdout() => "FILE" # These will issue errors REM Mon OMIT Mon SKIP MSG Never ever ever... -../tests/test.rem(442): Can't compute trigger +../tests/test.rem(448): Can't compute trigger REM Mon SATISFY [wkdaynum($T) == 3] MSG Nope nope... -../tests/test.rem(443): Trig = Monday, 18 February, 1991 +../tests/test.rem(449): Trig = Monday, 18 February, 1991 $T => 1991-02-18 wkdaynum(1991-02-18) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 25 February, 1991 +../tests/test.rem(449): Trig = Monday, 25 February, 1991 $T => 1991-02-25 wkdaynum(1991-02-25) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 4 March, 1991 +../tests/test.rem(449): Trig = Monday, 4 March, 1991 $T => 1991-03-04 wkdaynum(1991-03-04) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 11 March, 1991 +../tests/test.rem(449): Trig = Monday, 11 March, 1991 $T => 1991-03-11 wkdaynum(1991-03-11) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 18 March, 1991 +../tests/test.rem(449): Trig = Monday, 18 March, 1991 $T => 1991-03-18 wkdaynum(1991-03-18) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 25 March, 1991 +../tests/test.rem(449): Trig = Monday, 25 March, 1991 $T => 1991-03-25 wkdaynum(1991-03-25) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 1 April, 1991 +../tests/test.rem(449): Trig = Monday, 1 April, 1991 $T => 1991-04-01 wkdaynum(1991-04-01) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 8 April, 1991 +../tests/test.rem(449): Trig = Monday, 8 April, 1991 $T => 1991-04-08 wkdaynum(1991-04-08) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 15 April, 1991 +../tests/test.rem(449): Trig = Monday, 15 April, 1991 $T => 1991-04-15 wkdaynum(1991-04-15) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 22 April, 1991 +../tests/test.rem(449): Trig = Monday, 22 April, 1991 $T => 1991-04-22 wkdaynum(1991-04-22) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 29 April, 1991 +../tests/test.rem(449): Trig = Monday, 29 April, 1991 $T => 1991-04-29 wkdaynum(1991-04-29) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 6 May, 1991 +../tests/test.rem(449): Trig = Monday, 6 May, 1991 $T => 1991-05-06 wkdaynum(1991-05-06) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 13 May, 1991 +../tests/test.rem(449): Trig = Monday, 13 May, 1991 $T => 1991-05-13 wkdaynum(1991-05-13) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 20 May, 1991 +../tests/test.rem(449): Trig = Monday, 20 May, 1991 $T => 1991-05-20 wkdaynum(1991-05-20) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 27 May, 1991 +../tests/test.rem(449): Trig = Monday, 27 May, 1991 $T => 1991-05-27 wkdaynum(1991-05-27) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 3 June, 1991 +../tests/test.rem(449): Trig = Monday, 3 June, 1991 $T => 1991-06-03 wkdaynum(1991-06-03) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 10 June, 1991 +../tests/test.rem(449): Trig = Monday, 10 June, 1991 $T => 1991-06-10 wkdaynum(1991-06-10) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 17 June, 1991 +../tests/test.rem(449): Trig = Monday, 17 June, 1991 $T => 1991-06-17 wkdaynum(1991-06-17) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 24 June, 1991 +../tests/test.rem(449): Trig = Monday, 24 June, 1991 $T => 1991-06-24 wkdaynum(1991-06-24) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 1 July, 1991 +../tests/test.rem(449): Trig = Monday, 1 July, 1991 $T => 1991-07-01 wkdaynum(1991-07-01) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 8 July, 1991 +../tests/test.rem(449): Trig = Monday, 8 July, 1991 $T => 1991-07-08 wkdaynum(1991-07-08) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 15 July, 1991 +../tests/test.rem(449): Trig = Monday, 15 July, 1991 $T => 1991-07-15 wkdaynum(1991-07-15) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 22 July, 1991 +../tests/test.rem(449): Trig = Monday, 22 July, 1991 $T => 1991-07-22 wkdaynum(1991-07-22) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 29 July, 1991 +../tests/test.rem(449): Trig = Monday, 29 July, 1991 $T => 1991-07-29 wkdaynum(1991-07-29) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 5 August, 1991 +../tests/test.rem(449): Trig = Monday, 5 August, 1991 $T => 1991-08-05 wkdaynum(1991-08-05) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 12 August, 1991 +../tests/test.rem(449): Trig = Monday, 12 August, 1991 $T => 1991-08-12 wkdaynum(1991-08-12) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 19 August, 1991 +../tests/test.rem(449): Trig = Monday, 19 August, 1991 $T => 1991-08-19 wkdaynum(1991-08-19) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 26 August, 1991 +../tests/test.rem(449): Trig = Monday, 26 August, 1991 $T => 1991-08-26 wkdaynum(1991-08-26) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 2 September, 1991 +../tests/test.rem(449): Trig = Monday, 2 September, 1991 $T => 1991-09-02 wkdaynum(1991-09-02) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 9 September, 1991 +../tests/test.rem(449): Trig = Monday, 9 September, 1991 $T => 1991-09-09 wkdaynum(1991-09-09) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 16 September, 1991 +../tests/test.rem(449): Trig = Monday, 16 September, 1991 $T => 1991-09-16 wkdaynum(1991-09-16) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 23 September, 1991 +../tests/test.rem(449): Trig = Monday, 23 September, 1991 $T => 1991-09-23 wkdaynum(1991-09-23) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 30 September, 1991 +../tests/test.rem(449): Trig = Monday, 30 September, 1991 $T => 1991-09-30 wkdaynum(1991-09-30) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 7 October, 1991 +../tests/test.rem(449): Trig = Monday, 7 October, 1991 $T => 1991-10-07 wkdaynum(1991-10-07) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 14 October, 1991 +../tests/test.rem(449): Trig = Monday, 14 October, 1991 $T => 1991-10-14 wkdaynum(1991-10-14) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 21 October, 1991 +../tests/test.rem(449): Trig = Monday, 21 October, 1991 $T => 1991-10-21 wkdaynum(1991-10-21) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 28 October, 1991 +../tests/test.rem(449): Trig = Monday, 28 October, 1991 $T => 1991-10-28 wkdaynum(1991-10-28) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 4 November, 1991 +../tests/test.rem(449): Trig = Monday, 4 November, 1991 $T => 1991-11-04 wkdaynum(1991-11-04) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 11 November, 1991 +../tests/test.rem(449): Trig = Monday, 11 November, 1991 $T => 1991-11-11 wkdaynum(1991-11-11) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 18 November, 1991 +../tests/test.rem(449): Trig = Monday, 18 November, 1991 $T => 1991-11-18 wkdaynum(1991-11-18) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 25 November, 1991 +../tests/test.rem(449): Trig = Monday, 25 November, 1991 $T => 1991-11-25 wkdaynum(1991-11-25) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 2 December, 1991 +../tests/test.rem(449): Trig = Monday, 2 December, 1991 $T => 1991-12-02 wkdaynum(1991-12-02) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 9 December, 1991 +../tests/test.rem(449): Trig = Monday, 9 December, 1991 $T => 1991-12-09 wkdaynum(1991-12-09) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 16 December, 1991 +../tests/test.rem(449): Trig = Monday, 16 December, 1991 $T => 1991-12-16 wkdaynum(1991-12-16) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 23 December, 1991 +../tests/test.rem(449): Trig = Monday, 23 December, 1991 $T => 1991-12-23 wkdaynum(1991-12-23) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 30 December, 1991 +../tests/test.rem(449): Trig = Monday, 30 December, 1991 $T => 1991-12-30 wkdaynum(1991-12-30) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 6 January, 1992 +../tests/test.rem(449): Trig = Monday, 6 January, 1992 $T => 1992-01-06 wkdaynum(1992-01-06) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 13 January, 1992 +../tests/test.rem(449): Trig = Monday, 13 January, 1992 $T => 1992-01-13 wkdaynum(1992-01-13) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 20 January, 1992 +../tests/test.rem(449): Trig = Monday, 20 January, 1992 $T => 1992-01-20 wkdaynum(1992-01-20) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 27 January, 1992 +../tests/test.rem(449): Trig = Monday, 27 January, 1992 $T => 1992-01-27 wkdaynum(1992-01-27) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 3 February, 1992 +../tests/test.rem(449): Trig = Monday, 3 February, 1992 $T => 1992-02-03 wkdaynum(1992-02-03) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 10 February, 1992 +../tests/test.rem(449): Trig = Monday, 10 February, 1992 $T => 1992-02-10 wkdaynum(1992-02-10) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 17 February, 1992 +../tests/test.rem(449): Trig = Monday, 17 February, 1992 $T => 1992-02-17 wkdaynum(1992-02-17) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 24 February, 1992 +../tests/test.rem(449): Trig = Monday, 24 February, 1992 $T => 1992-02-24 wkdaynum(1992-02-24) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 2 March, 1992 +../tests/test.rem(449): Trig = Monday, 2 March, 1992 $T => 1992-03-02 wkdaynum(1992-03-02) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 9 March, 1992 +../tests/test.rem(449): Trig = Monday, 9 March, 1992 $T => 1992-03-09 wkdaynum(1992-03-09) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 16 March, 1992 +../tests/test.rem(449): Trig = Monday, 16 March, 1992 $T => 1992-03-16 wkdaynum(1992-03-16) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 23 March, 1992 +../tests/test.rem(449): Trig = Monday, 23 March, 1992 $T => 1992-03-23 wkdaynum(1992-03-23) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 30 March, 1992 +../tests/test.rem(449): Trig = Monday, 30 March, 1992 $T => 1992-03-30 wkdaynum(1992-03-30) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 6 April, 1992 +../tests/test.rem(449): Trig = Monday, 6 April, 1992 $T => 1992-04-06 wkdaynum(1992-04-06) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 13 April, 1992 +../tests/test.rem(449): Trig = Monday, 13 April, 1992 $T => 1992-04-13 wkdaynum(1992-04-13) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 20 April, 1992 +../tests/test.rem(449): Trig = Monday, 20 April, 1992 $T => 1992-04-20 wkdaynum(1992-04-20) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 27 April, 1992 +../tests/test.rem(449): Trig = Monday, 27 April, 1992 $T => 1992-04-27 wkdaynum(1992-04-27) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 4 May, 1992 +../tests/test.rem(449): Trig = Monday, 4 May, 1992 $T => 1992-05-04 wkdaynum(1992-05-04) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 11 May, 1992 +../tests/test.rem(449): Trig = Monday, 11 May, 1992 $T => 1992-05-11 wkdaynum(1992-05-11) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 18 May, 1992 +../tests/test.rem(449): Trig = Monday, 18 May, 1992 $T => 1992-05-18 wkdaynum(1992-05-18) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 25 May, 1992 +../tests/test.rem(449): Trig = Monday, 25 May, 1992 $T => 1992-05-25 wkdaynum(1992-05-25) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 1 June, 1992 +../tests/test.rem(449): Trig = Monday, 1 June, 1992 $T => 1992-06-01 wkdaynum(1992-06-01) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 8 June, 1992 +../tests/test.rem(449): Trig = Monday, 8 June, 1992 $T => 1992-06-08 wkdaynum(1992-06-08) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 15 June, 1992 +../tests/test.rem(449): Trig = Monday, 15 June, 1992 $T => 1992-06-15 wkdaynum(1992-06-15) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 22 June, 1992 +../tests/test.rem(449): Trig = Monday, 22 June, 1992 $T => 1992-06-22 wkdaynum(1992-06-22) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 29 June, 1992 +../tests/test.rem(449): Trig = Monday, 29 June, 1992 $T => 1992-06-29 wkdaynum(1992-06-29) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 6 July, 1992 +../tests/test.rem(449): Trig = Monday, 6 July, 1992 $T => 1992-07-06 wkdaynum(1992-07-06) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 13 July, 1992 +../tests/test.rem(449): Trig = Monday, 13 July, 1992 $T => 1992-07-13 wkdaynum(1992-07-13) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 20 July, 1992 +../tests/test.rem(449): Trig = Monday, 20 July, 1992 $T => 1992-07-20 wkdaynum(1992-07-20) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 27 July, 1992 +../tests/test.rem(449): Trig = Monday, 27 July, 1992 $T => 1992-07-27 wkdaynum(1992-07-27) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 3 August, 1992 +../tests/test.rem(449): Trig = Monday, 3 August, 1992 $T => 1992-08-03 wkdaynum(1992-08-03) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 10 August, 1992 +../tests/test.rem(449): Trig = Monday, 10 August, 1992 $T => 1992-08-10 wkdaynum(1992-08-10) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 17 August, 1992 +../tests/test.rem(449): Trig = Monday, 17 August, 1992 $T => 1992-08-17 wkdaynum(1992-08-17) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 24 August, 1992 +../tests/test.rem(449): Trig = Monday, 24 August, 1992 $T => 1992-08-24 wkdaynum(1992-08-24) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 31 August, 1992 +../tests/test.rem(449): Trig = Monday, 31 August, 1992 $T => 1992-08-31 wkdaynum(1992-08-31) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 7 September, 1992 +../tests/test.rem(449): Trig = Monday, 7 September, 1992 $T => 1992-09-07 wkdaynum(1992-09-07) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 14 September, 1992 +../tests/test.rem(449): Trig = Monday, 14 September, 1992 $T => 1992-09-14 wkdaynum(1992-09-14) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 21 September, 1992 +../tests/test.rem(449): Trig = Monday, 21 September, 1992 $T => 1992-09-21 wkdaynum(1992-09-21) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 28 September, 1992 +../tests/test.rem(449): Trig = Monday, 28 September, 1992 $T => 1992-09-28 wkdaynum(1992-09-28) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 5 October, 1992 +../tests/test.rem(449): Trig = Monday, 5 October, 1992 $T => 1992-10-05 wkdaynum(1992-10-05) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 12 October, 1992 +../tests/test.rem(449): Trig = Monday, 12 October, 1992 $T => 1992-10-12 wkdaynum(1992-10-12) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 19 October, 1992 +../tests/test.rem(449): Trig = Monday, 19 October, 1992 $T => 1992-10-19 wkdaynum(1992-10-19) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 26 October, 1992 +../tests/test.rem(449): Trig = Monday, 26 October, 1992 $T => 1992-10-26 wkdaynum(1992-10-26) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 2 November, 1992 +../tests/test.rem(449): Trig = Monday, 2 November, 1992 $T => 1992-11-02 wkdaynum(1992-11-02) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 9 November, 1992 +../tests/test.rem(449): Trig = Monday, 9 November, 1992 $T => 1992-11-09 wkdaynum(1992-11-09) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 16 November, 1992 +../tests/test.rem(449): Trig = Monday, 16 November, 1992 $T => 1992-11-16 wkdaynum(1992-11-16) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 23 November, 1992 +../tests/test.rem(449): Trig = Monday, 23 November, 1992 $T => 1992-11-23 wkdaynum(1992-11-23) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 30 November, 1992 +../tests/test.rem(449): Trig = Monday, 30 November, 1992 $T => 1992-11-30 wkdaynum(1992-11-30) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 7 December, 1992 +../tests/test.rem(449): Trig = Monday, 7 December, 1992 $T => 1992-12-07 wkdaynum(1992-12-07) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 14 December, 1992 +../tests/test.rem(449): Trig = Monday, 14 December, 1992 $T => 1992-12-14 wkdaynum(1992-12-14) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 21 December, 1992 +../tests/test.rem(449): Trig = Monday, 21 December, 1992 $T => 1992-12-21 wkdaynum(1992-12-21) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 28 December, 1992 +../tests/test.rem(449): Trig = Monday, 28 December, 1992 $T => 1992-12-28 wkdaynum(1992-12-28) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 4 January, 1993 +../tests/test.rem(449): Trig = Monday, 4 January, 1993 $T => 1993-01-04 wkdaynum(1993-01-04) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 11 January, 1993 +../tests/test.rem(449): Trig = Monday, 11 January, 1993 $T => 1993-01-11 wkdaynum(1993-01-11) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 18 January, 1993 +../tests/test.rem(449): Trig = Monday, 18 January, 1993 $T => 1993-01-18 wkdaynum(1993-01-18) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 25 January, 1993 +../tests/test.rem(449): Trig = Monday, 25 January, 1993 $T => 1993-01-25 wkdaynum(1993-01-25) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 1 February, 1993 +../tests/test.rem(449): Trig = Monday, 1 February, 1993 $T => 1993-02-01 wkdaynum(1993-02-01) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 8 February, 1993 +../tests/test.rem(449): Trig = Monday, 8 February, 1993 $T => 1993-02-08 wkdaynum(1993-02-08) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 15 February, 1993 +../tests/test.rem(449): Trig = Monday, 15 February, 1993 $T => 1993-02-15 wkdaynum(1993-02-15) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 22 February, 1993 +../tests/test.rem(449): Trig = Monday, 22 February, 1993 $T => 1993-02-22 wkdaynum(1993-02-22) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 1 March, 1993 +../tests/test.rem(449): Trig = Monday, 1 March, 1993 $T => 1993-03-01 wkdaynum(1993-03-01) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 8 March, 1993 +../tests/test.rem(449): Trig = Monday, 8 March, 1993 $T => 1993-03-08 wkdaynum(1993-03-08) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 15 March, 1993 +../tests/test.rem(449): Trig = Monday, 15 March, 1993 $T => 1993-03-15 wkdaynum(1993-03-15) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 22 March, 1993 +../tests/test.rem(449): Trig = Monday, 22 March, 1993 $T => 1993-03-22 wkdaynum(1993-03-22) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 29 March, 1993 +../tests/test.rem(449): Trig = Monday, 29 March, 1993 $T => 1993-03-29 wkdaynum(1993-03-29) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 5 April, 1993 +../tests/test.rem(449): Trig = Monday, 5 April, 1993 $T => 1993-04-05 wkdaynum(1993-04-05) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 12 April, 1993 +../tests/test.rem(449): Trig = Monday, 12 April, 1993 $T => 1993-04-12 wkdaynum(1993-04-12) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 19 April, 1993 +../tests/test.rem(449): Trig = Monday, 19 April, 1993 $T => 1993-04-19 wkdaynum(1993-04-19) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 26 April, 1993 +../tests/test.rem(449): Trig = Monday, 26 April, 1993 $T => 1993-04-26 wkdaynum(1993-04-26) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 3 May, 1993 +../tests/test.rem(449): Trig = Monday, 3 May, 1993 $T => 1993-05-03 wkdaynum(1993-05-03) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 10 May, 1993 +../tests/test.rem(449): Trig = Monday, 10 May, 1993 $T => 1993-05-10 wkdaynum(1993-05-10) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 17 May, 1993 +../tests/test.rem(449): Trig = Monday, 17 May, 1993 $T => 1993-05-17 wkdaynum(1993-05-17) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 24 May, 1993 +../tests/test.rem(449): Trig = Monday, 24 May, 1993 $T => 1993-05-24 wkdaynum(1993-05-24) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 31 May, 1993 +../tests/test.rem(449): Trig = Monday, 31 May, 1993 $T => 1993-05-31 wkdaynum(1993-05-31) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 7 June, 1993 +../tests/test.rem(449): Trig = Monday, 7 June, 1993 $T => 1993-06-07 wkdaynum(1993-06-07) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 14 June, 1993 +../tests/test.rem(449): Trig = Monday, 14 June, 1993 $T => 1993-06-14 wkdaynum(1993-06-14) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 21 June, 1993 +../tests/test.rem(449): Trig = Monday, 21 June, 1993 $T => 1993-06-21 wkdaynum(1993-06-21) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 28 June, 1993 +../tests/test.rem(449): Trig = Monday, 28 June, 1993 $T => 1993-06-28 wkdaynum(1993-06-28) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 5 July, 1993 +../tests/test.rem(449): Trig = Monday, 5 July, 1993 $T => 1993-07-05 wkdaynum(1993-07-05) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 12 July, 1993 +../tests/test.rem(449): Trig = Monday, 12 July, 1993 $T => 1993-07-12 wkdaynum(1993-07-12) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 19 July, 1993 +../tests/test.rem(449): Trig = Monday, 19 July, 1993 $T => 1993-07-19 wkdaynum(1993-07-19) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 26 July, 1993 +../tests/test.rem(449): Trig = Monday, 26 July, 1993 $T => 1993-07-26 wkdaynum(1993-07-26) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 2 August, 1993 +../tests/test.rem(449): Trig = Monday, 2 August, 1993 $T => 1993-08-02 wkdaynum(1993-08-02) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 9 August, 1993 +../tests/test.rem(449): Trig = Monday, 9 August, 1993 $T => 1993-08-09 wkdaynum(1993-08-09) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 16 August, 1993 +../tests/test.rem(449): Trig = Monday, 16 August, 1993 $T => 1993-08-16 wkdaynum(1993-08-16) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 23 August, 1993 +../tests/test.rem(449): Trig = Monday, 23 August, 1993 $T => 1993-08-23 wkdaynum(1993-08-23) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 30 August, 1993 +../tests/test.rem(449): Trig = Monday, 30 August, 1993 $T => 1993-08-30 wkdaynum(1993-08-30) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 6 September, 1993 +../tests/test.rem(449): Trig = Monday, 6 September, 1993 $T => 1993-09-06 wkdaynum(1993-09-06) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 13 September, 1993 +../tests/test.rem(449): Trig = Monday, 13 September, 1993 $T => 1993-09-13 wkdaynum(1993-09-13) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 20 September, 1993 +../tests/test.rem(449): Trig = Monday, 20 September, 1993 $T => 1993-09-20 wkdaynum(1993-09-20) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 27 September, 1993 +../tests/test.rem(449): Trig = Monday, 27 September, 1993 $T => 1993-09-27 wkdaynum(1993-09-27) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 4 October, 1993 +../tests/test.rem(449): Trig = Monday, 4 October, 1993 $T => 1993-10-04 wkdaynum(1993-10-04) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 11 October, 1993 +../tests/test.rem(449): Trig = Monday, 11 October, 1993 $T => 1993-10-11 wkdaynum(1993-10-11) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 18 October, 1993 +../tests/test.rem(449): Trig = Monday, 18 October, 1993 $T => 1993-10-18 wkdaynum(1993-10-18) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 25 October, 1993 +../tests/test.rem(449): Trig = Monday, 25 October, 1993 $T => 1993-10-25 wkdaynum(1993-10-25) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 1 November, 1993 +../tests/test.rem(449): Trig = Monday, 1 November, 1993 $T => 1993-11-01 wkdaynum(1993-11-01) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 8 November, 1993 +../tests/test.rem(449): Trig = Monday, 8 November, 1993 $T => 1993-11-08 wkdaynum(1993-11-08) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 15 November, 1993 +../tests/test.rem(449): Trig = Monday, 15 November, 1993 $T => 1993-11-15 wkdaynum(1993-11-15) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 22 November, 1993 +../tests/test.rem(449): Trig = Monday, 22 November, 1993 $T => 1993-11-22 wkdaynum(1993-11-22) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 29 November, 1993 +../tests/test.rem(449): Trig = Monday, 29 November, 1993 $T => 1993-11-29 wkdaynum(1993-11-29) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 6 December, 1993 +../tests/test.rem(449): Trig = Monday, 6 December, 1993 $T => 1993-12-06 wkdaynum(1993-12-06) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 13 December, 1993 +../tests/test.rem(449): Trig = Monday, 13 December, 1993 $T => 1993-12-13 wkdaynum(1993-12-13) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 20 December, 1993 +../tests/test.rem(449): Trig = Monday, 20 December, 1993 $T => 1993-12-20 wkdaynum(1993-12-20) => 1 1 == 3 => 0 -../tests/test.rem(443): Trig = Monday, 27 December, 1993 +../tests/test.rem(449): Trig = Monday, 27 December, 1993 $T => 1993-12-27 wkdaynum(1993-12-27) => 1 1 == 3 => 0 -../tests/test.rem(443): Can't compute trigger +../tests/test.rem(449): 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(447): Trig = Monday, 18 February, 1991 +../tests/test.rem(453): Trig = Monday, 18 February, 1991 $T => 1991-02-18 wkdaynum(1991-02-18) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 25 February, 1991 +../tests/test.rem(453): Trig = Monday, 25 February, 1991 $T => 1991-02-25 wkdaynum(1991-02-25) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 4 March, 1991 +../tests/test.rem(453): Trig = Monday, 4 March, 1991 $T => 1991-03-04 wkdaynum(1991-03-04) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 11 March, 1991 +../tests/test.rem(453): Trig = Monday, 11 March, 1991 $T => 1991-03-11 wkdaynum(1991-03-11) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 18 March, 1991 +../tests/test.rem(453): Trig = Monday, 18 March, 1991 $T => 1991-03-18 wkdaynum(1991-03-18) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 25 March, 1991 +../tests/test.rem(453): Trig = Monday, 25 March, 1991 $T => 1991-03-25 wkdaynum(1991-03-25) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 1 April, 1991 +../tests/test.rem(453): Trig = Monday, 1 April, 1991 $T => 1991-04-01 wkdaynum(1991-04-01) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 8 April, 1991 +../tests/test.rem(453): Trig = Monday, 8 April, 1991 $T => 1991-04-08 wkdaynum(1991-04-08) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 15 April, 1991 +../tests/test.rem(453): Trig = Monday, 15 April, 1991 $T => 1991-04-15 wkdaynum(1991-04-15) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 22 April, 1991 +../tests/test.rem(453): Trig = Monday, 22 April, 1991 $T => 1991-04-22 wkdaynum(1991-04-22) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 29 April, 1991 +../tests/test.rem(453): Trig = Monday, 29 April, 1991 $T => 1991-04-29 wkdaynum(1991-04-29) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 6 May, 1991 +../tests/test.rem(453): Trig = Monday, 6 May, 1991 $T => 1991-05-06 wkdaynum(1991-05-06) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 13 May, 1991 +../tests/test.rem(453): Trig = Monday, 13 May, 1991 $T => 1991-05-13 wkdaynum(1991-05-13) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 20 May, 1991 +../tests/test.rem(453): Trig = Monday, 20 May, 1991 $T => 1991-05-20 wkdaynum(1991-05-20) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 27 May, 1991 +../tests/test.rem(453): Trig = Monday, 27 May, 1991 $T => 1991-05-27 wkdaynum(1991-05-27) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 3 June, 1991 +../tests/test.rem(453): Trig = Monday, 3 June, 1991 $T => 1991-06-03 wkdaynum(1991-06-03) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 10 June, 1991 +../tests/test.rem(453): Trig = Monday, 10 June, 1991 $T => 1991-06-10 wkdaynum(1991-06-10) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 17 June, 1991 +../tests/test.rem(453): Trig = Monday, 17 June, 1991 $T => 1991-06-17 wkdaynum(1991-06-17) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 24 June, 1991 +../tests/test.rem(453): Trig = Monday, 24 June, 1991 $T => 1991-06-24 wkdaynum(1991-06-24) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 1 July, 1991 +../tests/test.rem(453): Trig = Monday, 1 July, 1991 $T => 1991-07-01 wkdaynum(1991-07-01) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 8 July, 1991 +../tests/test.rem(453): Trig = Monday, 8 July, 1991 $T => 1991-07-08 wkdaynum(1991-07-08) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 15 July, 1991 +../tests/test.rem(453): Trig = Monday, 15 July, 1991 $T => 1991-07-15 wkdaynum(1991-07-15) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 22 July, 1991 +../tests/test.rem(453): Trig = Monday, 22 July, 1991 $T => 1991-07-22 wkdaynum(1991-07-22) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 29 July, 1991 +../tests/test.rem(453): Trig = Monday, 29 July, 1991 $T => 1991-07-29 wkdaynum(1991-07-29) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 5 August, 1991 +../tests/test.rem(453): Trig = Monday, 5 August, 1991 $T => 1991-08-05 wkdaynum(1991-08-05) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 12 August, 1991 +../tests/test.rem(453): Trig = Monday, 12 August, 1991 $T => 1991-08-12 wkdaynum(1991-08-12) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 19 August, 1991 +../tests/test.rem(453): Trig = Monday, 19 August, 1991 $T => 1991-08-19 wkdaynum(1991-08-19) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 26 August, 1991 +../tests/test.rem(453): Trig = Monday, 26 August, 1991 $T => 1991-08-26 wkdaynum(1991-08-26) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 2 September, 1991 +../tests/test.rem(453): Trig = Monday, 2 September, 1991 $T => 1991-09-02 wkdaynum(1991-09-02) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 9 September, 1991 +../tests/test.rem(453): Trig = Monday, 9 September, 1991 $T => 1991-09-09 wkdaynum(1991-09-09) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 16 September, 1991 +../tests/test.rem(453): Trig = Monday, 16 September, 1991 $T => 1991-09-16 wkdaynum(1991-09-16) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 23 September, 1991 +../tests/test.rem(453): Trig = Monday, 23 September, 1991 $T => 1991-09-23 wkdaynum(1991-09-23) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 30 September, 1991 +../tests/test.rem(453): Trig = Monday, 30 September, 1991 $T => 1991-09-30 wkdaynum(1991-09-30) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 7 October, 1991 +../tests/test.rem(453): Trig = Monday, 7 October, 1991 $T => 1991-10-07 wkdaynum(1991-10-07) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 14 October, 1991 +../tests/test.rem(453): Trig = Monday, 14 October, 1991 $T => 1991-10-14 wkdaynum(1991-10-14) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 21 October, 1991 +../tests/test.rem(453): Trig = Monday, 21 October, 1991 $T => 1991-10-21 wkdaynum(1991-10-21) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 28 October, 1991 +../tests/test.rem(453): Trig = Monday, 28 October, 1991 $T => 1991-10-28 wkdaynum(1991-10-28) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 4 November, 1991 +../tests/test.rem(453): Trig = Monday, 4 November, 1991 $T => 1991-11-04 wkdaynum(1991-11-04) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 11 November, 1991 +../tests/test.rem(453): Trig = Monday, 11 November, 1991 $T => 1991-11-11 wkdaynum(1991-11-11) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 18 November, 1991 +../tests/test.rem(453): Trig = Monday, 18 November, 1991 $T => 1991-11-18 wkdaynum(1991-11-18) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 25 November, 1991 +../tests/test.rem(453): Trig = Monday, 25 November, 1991 $T => 1991-11-25 wkdaynum(1991-11-25) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 2 December, 1991 +../tests/test.rem(453): Trig = Monday, 2 December, 1991 $T => 1991-12-02 wkdaynum(1991-12-02) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 9 December, 1991 +../tests/test.rem(453): Trig = Monday, 9 December, 1991 $T => 1991-12-09 wkdaynum(1991-12-09) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 16 December, 1991 +../tests/test.rem(453): Trig = Monday, 16 December, 1991 $T => 1991-12-16 wkdaynum(1991-12-16) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 23 December, 1991 +../tests/test.rem(453): Trig = Monday, 23 December, 1991 $T => 1991-12-23 wkdaynum(1991-12-23) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 30 December, 1991 +../tests/test.rem(453): Trig = Monday, 30 December, 1991 $T => 1991-12-30 wkdaynum(1991-12-30) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 6 January, 1992 +../tests/test.rem(453): Trig = Monday, 6 January, 1992 $T => 1992-01-06 wkdaynum(1992-01-06) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 13 January, 1992 +../tests/test.rem(453): Trig = Monday, 13 January, 1992 $T => 1992-01-13 wkdaynum(1992-01-13) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 20 January, 1992 +../tests/test.rem(453): Trig = Monday, 20 January, 1992 $T => 1992-01-20 wkdaynum(1992-01-20) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 27 January, 1992 +../tests/test.rem(453): Trig = Monday, 27 January, 1992 $T => 1992-01-27 wkdaynum(1992-01-27) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 3 February, 1992 +../tests/test.rem(453): Trig = Monday, 3 February, 1992 $T => 1992-02-03 wkdaynum(1992-02-03) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 10 February, 1992 +../tests/test.rem(453): Trig = Monday, 10 February, 1992 $T => 1992-02-10 wkdaynum(1992-02-10) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 17 February, 1992 +../tests/test.rem(453): Trig = Monday, 17 February, 1992 $T => 1992-02-17 wkdaynum(1992-02-17) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 24 February, 1992 +../tests/test.rem(453): Trig = Monday, 24 February, 1992 $T => 1992-02-24 wkdaynum(1992-02-24) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 2 March, 1992 +../tests/test.rem(453): Trig = Monday, 2 March, 1992 $T => 1992-03-02 wkdaynum(1992-03-02) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 9 March, 1992 +../tests/test.rem(453): Trig = Monday, 9 March, 1992 $T => 1992-03-09 wkdaynum(1992-03-09) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 16 March, 1992 +../tests/test.rem(453): Trig = Monday, 16 March, 1992 $T => 1992-03-16 wkdaynum(1992-03-16) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 23 March, 1992 +../tests/test.rem(453): Trig = Monday, 23 March, 1992 $T => 1992-03-23 wkdaynum(1992-03-23) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 30 March, 1992 +../tests/test.rem(453): Trig = Monday, 30 March, 1992 $T => 1992-03-30 wkdaynum(1992-03-30) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 6 April, 1992 +../tests/test.rem(453): Trig = Monday, 6 April, 1992 $T => 1992-04-06 wkdaynum(1992-04-06) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 13 April, 1992 +../tests/test.rem(453): Trig = Monday, 13 April, 1992 $T => 1992-04-13 wkdaynum(1992-04-13) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 20 April, 1992 +../tests/test.rem(453): Trig = Monday, 20 April, 1992 $T => 1992-04-20 wkdaynum(1992-04-20) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 27 April, 1992 +../tests/test.rem(453): Trig = Monday, 27 April, 1992 $T => 1992-04-27 wkdaynum(1992-04-27) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 4 May, 1992 +../tests/test.rem(453): Trig = Monday, 4 May, 1992 $T => 1992-05-04 wkdaynum(1992-05-04) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 11 May, 1992 +../tests/test.rem(453): Trig = Monday, 11 May, 1992 $T => 1992-05-11 wkdaynum(1992-05-11) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 18 May, 1992 +../tests/test.rem(453): Trig = Monday, 18 May, 1992 $T => 1992-05-18 wkdaynum(1992-05-18) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 25 May, 1992 +../tests/test.rem(453): Trig = Monday, 25 May, 1992 $T => 1992-05-25 wkdaynum(1992-05-25) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 1 June, 1992 +../tests/test.rem(453): Trig = Monday, 1 June, 1992 $T => 1992-06-01 wkdaynum(1992-06-01) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 8 June, 1992 +../tests/test.rem(453): Trig = Monday, 8 June, 1992 $T => 1992-06-08 wkdaynum(1992-06-08) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 15 June, 1992 +../tests/test.rem(453): Trig = Monday, 15 June, 1992 $T => 1992-06-15 wkdaynum(1992-06-15) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 22 June, 1992 +../tests/test.rem(453): Trig = Monday, 22 June, 1992 $T => 1992-06-22 wkdaynum(1992-06-22) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 29 June, 1992 +../tests/test.rem(453): Trig = Monday, 29 June, 1992 $T => 1992-06-29 wkdaynum(1992-06-29) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 6 July, 1992 +../tests/test.rem(453): Trig = Monday, 6 July, 1992 $T => 1992-07-06 wkdaynum(1992-07-06) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 13 July, 1992 +../tests/test.rem(453): Trig = Monday, 13 July, 1992 $T => 1992-07-13 wkdaynum(1992-07-13) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 20 July, 1992 +../tests/test.rem(453): Trig = Monday, 20 July, 1992 $T => 1992-07-20 wkdaynum(1992-07-20) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 27 July, 1992 +../tests/test.rem(453): Trig = Monday, 27 July, 1992 $T => 1992-07-27 wkdaynum(1992-07-27) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 3 August, 1992 +../tests/test.rem(453): Trig = Monday, 3 August, 1992 $T => 1992-08-03 wkdaynum(1992-08-03) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 10 August, 1992 +../tests/test.rem(453): Trig = Monday, 10 August, 1992 $T => 1992-08-10 wkdaynum(1992-08-10) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 17 August, 1992 +../tests/test.rem(453): Trig = Monday, 17 August, 1992 $T => 1992-08-17 wkdaynum(1992-08-17) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 24 August, 1992 +../tests/test.rem(453): Trig = Monday, 24 August, 1992 $T => 1992-08-24 wkdaynum(1992-08-24) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 31 August, 1992 +../tests/test.rem(453): Trig = Monday, 31 August, 1992 $T => 1992-08-31 wkdaynum(1992-08-31) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 7 September, 1992 +../tests/test.rem(453): Trig = Monday, 7 September, 1992 $T => 1992-09-07 wkdaynum(1992-09-07) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 14 September, 1992 +../tests/test.rem(453): Trig = Monday, 14 September, 1992 $T => 1992-09-14 wkdaynum(1992-09-14) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 21 September, 1992 +../tests/test.rem(453): Trig = Monday, 21 September, 1992 $T => 1992-09-21 wkdaynum(1992-09-21) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 28 September, 1992 +../tests/test.rem(453): Trig = Monday, 28 September, 1992 $T => 1992-09-28 wkdaynum(1992-09-28) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 5 October, 1992 +../tests/test.rem(453): Trig = Monday, 5 October, 1992 $T => 1992-10-05 wkdaynum(1992-10-05) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 12 October, 1992 +../tests/test.rem(453): Trig = Monday, 12 October, 1992 $T => 1992-10-12 wkdaynum(1992-10-12) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 19 October, 1992 +../tests/test.rem(453): Trig = Monday, 19 October, 1992 $T => 1992-10-19 wkdaynum(1992-10-19) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 26 October, 1992 +../tests/test.rem(453): Trig = Monday, 26 October, 1992 $T => 1992-10-26 wkdaynum(1992-10-26) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 2 November, 1992 +../tests/test.rem(453): Trig = Monday, 2 November, 1992 $T => 1992-11-02 wkdaynum(1992-11-02) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 9 November, 1992 +../tests/test.rem(453): Trig = Monday, 9 November, 1992 $T => 1992-11-09 wkdaynum(1992-11-09) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 16 November, 1992 +../tests/test.rem(453): Trig = Monday, 16 November, 1992 $T => 1992-11-16 wkdaynum(1992-11-16) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 23 November, 1992 +../tests/test.rem(453): Trig = Monday, 23 November, 1992 $T => 1992-11-23 wkdaynum(1992-11-23) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 30 November, 1992 +../tests/test.rem(453): Trig = Monday, 30 November, 1992 $T => 1992-11-30 wkdaynum(1992-11-30) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 7 December, 1992 +../tests/test.rem(453): Trig = Monday, 7 December, 1992 $T => 1992-12-07 wkdaynum(1992-12-07) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 14 December, 1992 +../tests/test.rem(453): Trig = Monday, 14 December, 1992 $T => 1992-12-14 wkdaynum(1992-12-14) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 21 December, 1992 +../tests/test.rem(453): Trig = Monday, 21 December, 1992 $T => 1992-12-21 wkdaynum(1992-12-21) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 28 December, 1992 +../tests/test.rem(453): Trig = Monday, 28 December, 1992 $T => 1992-12-28 wkdaynum(1992-12-28) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 4 January, 1993 +../tests/test.rem(453): Trig = Monday, 4 January, 1993 $T => 1993-01-04 wkdaynum(1993-01-04) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 11 January, 1993 +../tests/test.rem(453): Trig = Monday, 11 January, 1993 $T => 1993-01-11 wkdaynum(1993-01-11) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 18 January, 1993 +../tests/test.rem(453): Trig = Monday, 18 January, 1993 $T => 1993-01-18 wkdaynum(1993-01-18) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 25 January, 1993 +../tests/test.rem(453): Trig = Monday, 25 January, 1993 $T => 1993-01-25 wkdaynum(1993-01-25) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 1 February, 1993 +../tests/test.rem(453): Trig = Monday, 1 February, 1993 $T => 1993-02-01 wkdaynum(1993-02-01) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 8 February, 1993 +../tests/test.rem(453): Trig = Monday, 8 February, 1993 $T => 1993-02-08 wkdaynum(1993-02-08) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 15 February, 1993 +../tests/test.rem(453): Trig = Monday, 15 February, 1993 $T => 1993-02-15 wkdaynum(1993-02-15) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 22 February, 1993 +../tests/test.rem(453): Trig = Monday, 22 February, 1993 $T => 1993-02-22 wkdaynum(1993-02-22) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 1 March, 1993 +../tests/test.rem(453): Trig = Monday, 1 March, 1993 $T => 1993-03-01 wkdaynum(1993-03-01) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 8 March, 1993 +../tests/test.rem(453): Trig = Monday, 8 March, 1993 $T => 1993-03-08 wkdaynum(1993-03-08) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 15 March, 1993 +../tests/test.rem(453): Trig = Monday, 15 March, 1993 $T => 1993-03-15 wkdaynum(1993-03-15) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 22 March, 1993 +../tests/test.rem(453): Trig = Monday, 22 March, 1993 $T => 1993-03-22 wkdaynum(1993-03-22) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 29 March, 1993 +../tests/test.rem(453): Trig = Monday, 29 March, 1993 $T => 1993-03-29 wkdaynum(1993-03-29) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 5 April, 1993 +../tests/test.rem(453): Trig = Monday, 5 April, 1993 $T => 1993-04-05 wkdaynum(1993-04-05) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 12 April, 1993 +../tests/test.rem(453): Trig = Monday, 12 April, 1993 $T => 1993-04-12 wkdaynum(1993-04-12) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 19 April, 1993 +../tests/test.rem(453): Trig = Monday, 19 April, 1993 $T => 1993-04-19 wkdaynum(1993-04-19) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 26 April, 1993 +../tests/test.rem(453): Trig = Monday, 26 April, 1993 $T => 1993-04-26 wkdaynum(1993-04-26) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 3 May, 1993 +../tests/test.rem(453): Trig = Monday, 3 May, 1993 $T => 1993-05-03 wkdaynum(1993-05-03) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 10 May, 1993 +../tests/test.rem(453): Trig = Monday, 10 May, 1993 $T => 1993-05-10 wkdaynum(1993-05-10) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 17 May, 1993 +../tests/test.rem(453): Trig = Monday, 17 May, 1993 $T => 1993-05-17 wkdaynum(1993-05-17) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 24 May, 1993 +../tests/test.rem(453): Trig = Monday, 24 May, 1993 $T => 1993-05-24 wkdaynum(1993-05-24) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 31 May, 1993 +../tests/test.rem(453): Trig = Monday, 31 May, 1993 $T => 1993-05-31 wkdaynum(1993-05-31) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 7 June, 1993 +../tests/test.rem(453): Trig = Monday, 7 June, 1993 $T => 1993-06-07 wkdaynum(1993-06-07) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 14 June, 1993 +../tests/test.rem(453): Trig = Monday, 14 June, 1993 $T => 1993-06-14 wkdaynum(1993-06-14) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 21 June, 1993 +../tests/test.rem(453): Trig = Monday, 21 June, 1993 $T => 1993-06-21 wkdaynum(1993-06-21) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 28 June, 1993 +../tests/test.rem(453): Trig = Monday, 28 June, 1993 $T => 1993-06-28 wkdaynum(1993-06-28) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 5 July, 1993 +../tests/test.rem(453): Trig = Monday, 5 July, 1993 $T => 1993-07-05 wkdaynum(1993-07-05) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 12 July, 1993 +../tests/test.rem(453): Trig = Monday, 12 July, 1993 $T => 1993-07-12 wkdaynum(1993-07-12) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 19 July, 1993 +../tests/test.rem(453): Trig = Monday, 19 July, 1993 $T => 1993-07-19 wkdaynum(1993-07-19) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 26 July, 1993 +../tests/test.rem(453): Trig = Monday, 26 July, 1993 $T => 1993-07-26 wkdaynum(1993-07-26) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 2 August, 1993 +../tests/test.rem(453): Trig = Monday, 2 August, 1993 $T => 1993-08-02 wkdaynum(1993-08-02) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 9 August, 1993 +../tests/test.rem(453): Trig = Monday, 9 August, 1993 $T => 1993-08-09 wkdaynum(1993-08-09) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 16 August, 1993 +../tests/test.rem(453): Trig = Monday, 16 August, 1993 $T => 1993-08-16 wkdaynum(1993-08-16) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 23 August, 1993 +../tests/test.rem(453): Trig = Monday, 23 August, 1993 $T => 1993-08-23 wkdaynum(1993-08-23) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 30 August, 1993 +../tests/test.rem(453): Trig = Monday, 30 August, 1993 $T => 1993-08-30 wkdaynum(1993-08-30) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 6 September, 1993 +../tests/test.rem(453): Trig = Monday, 6 September, 1993 $T => 1993-09-06 wkdaynum(1993-09-06) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 13 September, 1993 +../tests/test.rem(453): Trig = Monday, 13 September, 1993 $T => 1993-09-13 wkdaynum(1993-09-13) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 20 September, 1993 +../tests/test.rem(453): Trig = Monday, 20 September, 1993 $T => 1993-09-20 wkdaynum(1993-09-20) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 27 September, 1993 +../tests/test.rem(453): Trig = Monday, 27 September, 1993 $T => 1993-09-27 wkdaynum(1993-09-27) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 4 October, 1993 +../tests/test.rem(453): Trig = Monday, 4 October, 1993 $T => 1993-10-04 wkdaynum(1993-10-04) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 11 October, 1993 +../tests/test.rem(453): Trig = Monday, 11 October, 1993 $T => 1993-10-11 wkdaynum(1993-10-11) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 18 October, 1993 +../tests/test.rem(453): Trig = Monday, 18 October, 1993 $T => 1993-10-18 wkdaynum(1993-10-18) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 25 October, 1993 +../tests/test.rem(453): Trig = Monday, 25 October, 1993 $T => 1993-10-25 wkdaynum(1993-10-25) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 1 November, 1993 +../tests/test.rem(453): Trig = Monday, 1 November, 1993 $T => 1993-11-01 wkdaynum(1993-11-01) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 8 November, 1993 +../tests/test.rem(453): Trig = Monday, 8 November, 1993 $T => 1993-11-08 wkdaynum(1993-11-08) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 15 November, 1993 +../tests/test.rem(453): Trig = Monday, 15 November, 1993 $T => 1993-11-15 wkdaynum(1993-11-15) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 22 November, 1993 +../tests/test.rem(453): Trig = Monday, 22 November, 1993 $T => 1993-11-22 wkdaynum(1993-11-22) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 29 November, 1993 +../tests/test.rem(453): Trig = Monday, 29 November, 1993 $T => 1993-11-29 wkdaynum(1993-11-29) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 6 December, 1993 +../tests/test.rem(453): Trig = Monday, 6 December, 1993 $T => 1993-12-06 wkdaynum(1993-12-06) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 13 December, 1993 +../tests/test.rem(453): Trig = Monday, 13 December, 1993 $T => 1993-12-13 wkdaynum(1993-12-13) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 20 December, 1993 +../tests/test.rem(453): Trig = Monday, 20 December, 1993 $T => 1993-12-20 wkdaynum(1993-12-20) => 1 1 == 3 => 0 -../tests/test.rem(447): Trig = Monday, 27 December, 1993 +../tests/test.rem(453): Trig = Monday, 27 December, 1993 $T => 1993-12-27 wkdaynum(1993-12-27) => 1 1 == 3 => 0 @@ -2781,343 +2791,343 @@ Variable Value $Was "was" $Wednesday "Wednesday" msg [$April]% -../tests/test.rem(451): Trig = Saturday, 16 February, 1991 +../tests/test.rem(457): Trig = Saturday, 16 February, 1991 $April => "April" April msg [$August]% -../tests/test.rem(452): Trig = Saturday, 16 February, 1991 +../tests/test.rem(458): Trig = Saturday, 16 February, 1991 $August => "August" August msg [$CalcUTC]% -../tests/test.rem(453): Trig = Saturday, 16 February, 1991 +../tests/test.rem(459): Trig = Saturday, 16 February, 1991 $CalcUTC => 0 0 msg [$CalMode]% -../tests/test.rem(454): Trig = Saturday, 16 February, 1991 +../tests/test.rem(460): Trig = Saturday, 16 February, 1991 $CalMode => 0 0 msg [$Daemon]% -../tests/test.rem(455): Trig = Saturday, 16 February, 1991 +../tests/test.rem(461): Trig = Saturday, 16 February, 1991 $Daemon => 0 0 msg [$DateSep]% -../tests/test.rem(456): Trig = Saturday, 16 February, 1991 +../tests/test.rem(462): Trig = Saturday, 16 February, 1991 $DateSep => "-" - msg [$DateTimeSep]% -../tests/test.rem(457): Trig = Saturday, 16 February, 1991 +../tests/test.rem(463): Trig = Saturday, 16 February, 1991 $DateTimeSep => "@" @ msg [$December]% -../tests/test.rem(458): Trig = Saturday, 16 February, 1991 +../tests/test.rem(464): Trig = Saturday, 16 February, 1991 $December => "December" December msg [$DefaultColor]% -../tests/test.rem(459): Trig = Saturday, 16 February, 1991 +../tests/test.rem(465): Trig = Saturday, 16 February, 1991 $DefaultColor => "-1 -1 -1" -1 -1 -1 msg [$DefaultPrio]% -../tests/test.rem(460): Trig = Saturday, 16 February, 1991 +../tests/test.rem(466): Trig = Saturday, 16 February, 1991 $DefaultPrio => 5000 5000 msg [$DefaultTDelta]% -../tests/test.rem(461): Trig = Saturday, 16 February, 1991 +../tests/test.rem(467): Trig = Saturday, 16 February, 1991 $DefaultTDelta => 0 0 msg [$DeltaOffset]% -../tests/test.rem(462): Trig = Saturday, 16 February, 1991 +../tests/test.rem(468): Trig = Saturday, 16 February, 1991 $DeltaOffset => 0 0 msg [$DontFork]% -../tests/test.rem(463): Trig = Saturday, 16 February, 1991 +../tests/test.rem(469): Trig = Saturday, 16 February, 1991 $DontFork => 0 0 msg [$DontQueue]% -../tests/test.rem(464): Trig = Saturday, 16 February, 1991 +../tests/test.rem(470): Trig = Saturday, 16 February, 1991 $DontQueue => 0 0 msg [$DontTrigAts]% -../tests/test.rem(465): Trig = Saturday, 16 February, 1991 +../tests/test.rem(471): Trig = Saturday, 16 February, 1991 $DontTrigAts => 0 0 msg [$EndSent]% -../tests/test.rem(466): Trig = Saturday, 16 February, 1991 +../tests/test.rem(472): Trig = Saturday, 16 February, 1991 $EndSent => ".?!" .?! msg [$EndSentIg]% -../tests/test.rem(467): Trig = Saturday, 16 February, 1991 +../tests/test.rem(473): Trig = Saturday, 16 February, 1991 $EndSentIg => "\"')]}>" "')]}> msg [$February]% -../tests/test.rem(468): Trig = Saturday, 16 February, 1991 +../tests/test.rem(474): Trig = Saturday, 16 February, 1991 $February => "February" February msg [$FirstIndent]% -../tests/test.rem(469): Trig = Saturday, 16 February, 1991 +../tests/test.rem(475): Trig = Saturday, 16 February, 1991 $FirstIndent => 0 0 msg [$FoldYear]% -../tests/test.rem(470): Trig = Saturday, 16 February, 1991 +../tests/test.rem(476): Trig = Saturday, 16 February, 1991 $FoldYear => 0 0 msg [$FormWidth]% -../tests/test.rem(471): Trig = Saturday, 16 February, 1991 +../tests/test.rem(477): Trig = Saturday, 16 February, 1991 $FormWidth => 72 72 msg [$Friday]% -../tests/test.rem(472): Trig = Saturday, 16 February, 1991 +../tests/test.rem(478): Trig = Saturday, 16 February, 1991 $Friday => "Friday" Friday msg [$HushMode]% -../tests/test.rem(473): Trig = Saturday, 16 February, 1991 +../tests/test.rem(479): Trig = Saturday, 16 February, 1991 $HushMode => 0 0 msg [$IgnoreOnce]% -../tests/test.rem(474): Trig = Saturday, 16 February, 1991 +../tests/test.rem(480): Trig = Saturday, 16 February, 1991 $IgnoreOnce => 1 1 msg [$InfDelta]% -../tests/test.rem(475): Trig = Saturday, 16 February, 1991 +../tests/test.rem(481): Trig = Saturday, 16 February, 1991 $InfDelta => 0 0 msg [$IntMax]% -../tests/test.rem(476): Trig = Saturday, 16 February, 1991 +../tests/test.rem(482): Trig = Saturday, 16 February, 1991 $IntMax => 2147483647 2147483647 msg [$IntMin]% -../tests/test.rem(477): Trig = Saturday, 16 February, 1991 +../tests/test.rem(483): Trig = Saturday, 16 February, 1991 $IntMin => -2147483648 -2147483648 msg [$January]% -../tests/test.rem(478): Trig = Saturday, 16 February, 1991 +../tests/test.rem(484): Trig = Saturday, 16 February, 1991 $January => "January" January msg [$July]% -../tests/test.rem(479): Trig = Saturday, 16 February, 1991 +../tests/test.rem(485): Trig = Saturday, 16 February, 1991 $July => "July" July msg [$June]% -../tests/test.rem(480): Trig = Saturday, 16 February, 1991 +../tests/test.rem(486): Trig = Saturday, 16 February, 1991 $June => "June" June msg [$LatDeg]% -../tests/test.rem(481): Trig = Saturday, 16 February, 1991 +../tests/test.rem(487): Trig = Saturday, 16 February, 1991 $LatDeg => 30 30 msg [$Latitude]% -../tests/test.rem(482): Trig = Saturday, 16 February, 1991 +../tests/test.rem(488): Trig = Saturday, 16 February, 1991 $Latitude => "30.500000" 30.500000 msg [$LatMin]% -../tests/test.rem(483): Trig = Saturday, 16 February, 1991 +../tests/test.rem(489): Trig = Saturday, 16 February, 1991 $LatMin => 30 30 msg [$LatSec]% -../tests/test.rem(484): Trig = Saturday, 16 February, 1991 +../tests/test.rem(490): Trig = Saturday, 16 February, 1991 $LatSec => 0 0 msg [$Location]% -../tests/test.rem(485): Trig = Saturday, 16 February, 1991 +../tests/test.rem(491): Trig = Saturday, 16 February, 1991 $Location => "Ottawa" Ottawa msg [$LongDeg]% -../tests/test.rem(486): Trig = Saturday, 16 February, 1991 +../tests/test.rem(492): Trig = Saturday, 16 February, 1991 $LongDeg => -25 -25 msg [$Longitude]% -../tests/test.rem(487): Trig = Saturday, 16 February, 1991 +../tests/test.rem(493): Trig = Saturday, 16 February, 1991 $Longitude => "24.750000" 24.750000 msg [$LongMin]% -../tests/test.rem(488): Trig = Saturday, 16 February, 1991 +../tests/test.rem(494): Trig = Saturday, 16 February, 1991 $LongMin => 15 15 msg [$LongSec]% -../tests/test.rem(489): Trig = Saturday, 16 February, 1991 +../tests/test.rem(495): Trig = Saturday, 16 February, 1991 $LongSec => 0 0 msg [$March]% -../tests/test.rem(490): Trig = Saturday, 16 February, 1991 +../tests/test.rem(496): Trig = Saturday, 16 February, 1991 $March => "March" March msg [$MaxSatIter]% -../tests/test.rem(491): Trig = Saturday, 16 February, 1991 +../tests/test.rem(497): Trig = Saturday, 16 February, 1991 $MaxSatIter => 150 150 msg [$MaxStringLen]% -../tests/test.rem(492): Trig = Saturday, 16 February, 1991 +../tests/test.rem(498): Trig = Saturday, 16 February, 1991 $MaxStringLen => 65535 65535 msg [$May]% -../tests/test.rem(493): Trig = Saturday, 16 February, 1991 +../tests/test.rem(499): Trig = Saturday, 16 February, 1991 $May => "May" May msg [$MinsFromUTC]% -../tests/test.rem(494): Trig = Saturday, 16 February, 1991 +../tests/test.rem(500): Trig = Saturday, 16 February, 1991 $MinsFromUTC => -300 -300 msg [$Monday]% -../tests/test.rem(495): Trig = Saturday, 16 February, 1991 +../tests/test.rem(501): Trig = Saturday, 16 February, 1991 $Monday => "Monday" Monday msg [$NextMode]% -../tests/test.rem(496): Trig = Saturday, 16 February, 1991 +../tests/test.rem(502): Trig = Saturday, 16 February, 1991 $NextMode => 0 0 msg [$November]% -../tests/test.rem(497): Trig = Saturday, 16 February, 1991 +../tests/test.rem(503): Trig = Saturday, 16 February, 1991 $November => "November" November msg [$NumQueued]% -../tests/test.rem(498): Trig = Saturday, 16 February, 1991 +../tests/test.rem(504): Trig = Saturday, 16 February, 1991 $NumQueued => 0 0 msg [$NumTrig]% -../tests/test.rem(499): Trig = Saturday, 16 February, 1991 +../tests/test.rem(505): Trig = Saturday, 16 February, 1991 $NumTrig => 85 85 msg [$October]% -../tests/test.rem(500): Trig = Saturday, 16 February, 1991 +../tests/test.rem(506): Trig = Saturday, 16 February, 1991 $October => "October" October msg [$PrefixLineNo]% -../tests/test.rem(501): Trig = Saturday, 16 February, 1991 +../tests/test.rem(507): Trig = Saturday, 16 February, 1991 $PrefixLineNo => 0 0 msg [$PSCal]% -../tests/test.rem(502): Trig = Saturday, 16 February, 1991 +../tests/test.rem(508): Trig = Saturday, 16 February, 1991 $PSCal => 0 0 msg [$RunOff]% -../tests/test.rem(503): Trig = Saturday, 16 February, 1991 +../tests/test.rem(509): Trig = Saturday, 16 February, 1991 $RunOff => 0 0 msg [$Saturday]% -../tests/test.rem(504): Trig = Saturday, 16 February, 1991 +../tests/test.rem(510): Trig = Saturday, 16 February, 1991 $Saturday => "Saturday" Saturday msg [$September]% -../tests/test.rem(505): Trig = Saturday, 16 February, 1991 +../tests/test.rem(511): Trig = Saturday, 16 February, 1991 $September => "September" September msg [$SimpleCal]% -../tests/test.rem(506): Trig = Saturday, 16 February, 1991 +../tests/test.rem(512): Trig = Saturday, 16 February, 1991 $SimpleCal => 0 0 msg [$SortByDate]% -../tests/test.rem(507): Trig = Saturday, 16 February, 1991 +../tests/test.rem(513): Trig = Saturday, 16 February, 1991 $SortByDate => 0 0 msg [$SortByPrio]% -../tests/test.rem(508): Trig = Saturday, 16 February, 1991 +../tests/test.rem(514): Trig = Saturday, 16 February, 1991 $SortByPrio => 0 0 msg [$SortByTime]% -../tests/test.rem(509): Trig = Saturday, 16 February, 1991 +../tests/test.rem(515): Trig = Saturday, 16 February, 1991 $SortByTime => 0 0 msg [$SubsIndent]% -../tests/test.rem(510): Trig = Saturday, 16 February, 1991 +../tests/test.rem(516): Trig = Saturday, 16 February, 1991 $SubsIndent => 0 0 msg [$Sunday]% -../tests/test.rem(511): Trig = Saturday, 16 February, 1991 +../tests/test.rem(517): Trig = Saturday, 16 February, 1991 $Sunday => "Sunday" Sunday msg [$T]% -../tests/test.rem(512): Trig = Saturday, 16 February, 1991 +../tests/test.rem(518): Trig = Saturday, 16 February, 1991 $T => 1991-02-16 1991-02-16 msg [$Td]% -../tests/test.rem(513): Trig = Saturday, 16 February, 1991 +../tests/test.rem(519): Trig = Saturday, 16 February, 1991 $Td => 16 16 msg [$Thursday]% -../tests/test.rem(514): Trig = Saturday, 16 February, 1991 +../tests/test.rem(520): Trig = Saturday, 16 February, 1991 $Thursday => "Thursday" Thursday msg [$TimeSep]% -../tests/test.rem(515): Trig = Saturday, 16 February, 1991 +../tests/test.rem(521): Trig = Saturday, 16 February, 1991 $TimeSep => ":" : msg [$Tm]% -../tests/test.rem(516): Trig = Saturday, 16 February, 1991 +../tests/test.rem(522): Trig = Saturday, 16 February, 1991 $Tm => 2 2 msg [$Tuesday]% -../tests/test.rem(517): Trig = Saturday, 16 February, 1991 +../tests/test.rem(523): Trig = Saturday, 16 February, 1991 $Tuesday => "Tuesday" Tuesday msg [$Tw]% -../tests/test.rem(518): Trig = Saturday, 16 February, 1991 +../tests/test.rem(524): Trig = Saturday, 16 February, 1991 $Tw => 6 6 msg [$Ty]% -../tests/test.rem(519): Trig = Saturday, 16 February, 1991 +../tests/test.rem(525): Trig = Saturday, 16 February, 1991 $Ty => 1991 1991 msg [$U]% -../tests/test.rem(520): Trig = Saturday, 16 February, 1991 +../tests/test.rem(526): Trig = Saturday, 16 February, 1991 $U => 1991-02-16 1991-02-16 msg [$Ud]% -../tests/test.rem(521): Trig = Saturday, 16 February, 1991 +../tests/test.rem(527): Trig = Saturday, 16 February, 1991 $Ud => 16 16 msg [$Um]% -../tests/test.rem(522): Trig = Saturday, 16 February, 1991 +../tests/test.rem(528): Trig = Saturday, 16 February, 1991 $Um => 2 2 msg [$UntimedFirst]% -../tests/test.rem(523): Trig = Saturday, 16 February, 1991 +../tests/test.rem(529): Trig = Saturday, 16 February, 1991 $UntimedFirst => 0 0 msg [$Uw]% -../tests/test.rem(524): Trig = Saturday, 16 February, 1991 +../tests/test.rem(530): Trig = Saturday, 16 February, 1991 $Uw => 6 6 msg [$Uy]% -../tests/test.rem(525): Trig = Saturday, 16 February, 1991 +../tests/test.rem(531): Trig = Saturday, 16 February, 1991 $Uy => 1991 1991 msg [$Wednesday]% -../tests/test.rem(526): Trig = Saturday, 16 February, 1991 +../tests/test.rem(532): 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(530): Expired +../tests/test.rem(536): Expired REM 1992-01-01 *1 UNTIL 1991-12-31 MSG Diagnosed -../tests/test.rem(531): Warning: UNTIL/THROUGH date earlier than start date -../tests/test.rem(531): Trig = Wednesday, 1 January, 1992 +../tests/test.rem(537): Warning: UNTIL/THROUGH date earlier than start date +../tests/test.rem(537): 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(533): Trig = Wednesday, 1 January, 1992 +../tests/test.rem(539): Trig = Wednesday, 1 January, 1992 REM MON FROM 1992-01-01 UNTIL 1991-12-31 Diagnosed -../tests/test.rem(535): Warning: UNTIL/THROUGH date earlier than FROM date -../tests/test.rem(535): Expired +../tests/test.rem(541): Warning: UNTIL/THROUGH date earlier than FROM date +../tests/test.rem(541): 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 +../tests/test.rem(542): Warning: UNTIL/THROUGH date earlier than SCANFROM date +../tests/test.rem(542): Expired REM MON FROM [x] UNTIL 1991-12-31 Not diagnosed x => 1992-01-01 -../tests/test.rem(538): Expired +../tests/test.rem(544): Expired REM MON SCANFROM [x] UNTIL 1991-12-31 Not diagnosed x => 1992-01-01 -../tests/test.rem(539): Expired +../tests/test.rem(545): Expired REM 1992-01-01 UNTIL 1992-02-02 MSG Diagnosed -../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 +../tests/test.rem(547): Warning: Useless use of UNTIL with fully-specified date and no *rep +../tests/test.rem(547): 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 +../tests/test.rem(548): Warning: Useless use of UNTIL with fully-specified date and no *rep +../tests/test.rem(548): Trig = Wednesday, 1 January, 1992 dump $aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa Variable Value @@ -3125,10 +3135,10 @@ Variable Value $aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa: Name too long OMIT 2010-09-03 THROUGH 2010-09-15 OMIT December 25 MSG X -../tests/test.rem(546): Trig = Wednesday, 25 December, 1991 +../tests/test.rem(552): 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(548): Trig = Sunday, 26 December, 2010 +../tests/test.rem(554): Trig = Sunday, 26 December, 2010 OMIT DUMP Global Full OMITs (16 of maximum allowed 1000): 1991-03-11 @@ -3149,6 +3159,8 @@ Global Full OMITs (16 of maximum allowed 1000): 2010-12-27 Global Partial OMITs (1 of maximum allowed 366): 12-25 +Globally omitted weekdays: + None. # Regression test for bugfix in Hebrew calendar Adar jahrzeit [_i(14, "Adar", today(), 5761)] MSG Purim today() => 1991-02-16 @@ -3160,287 +3172,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(551): Trig = Thursday, 28 February, 1991 +../tests/test.rem(557): Trig = Thursday, 28 February, 1991 # Regression test for bug found by Larry Hynes REM SATISFY [day(trigdate()-25) == 14] MSG Foo -../tests/test.rem(554): Trig = Saturday, 16 February, 1991 +../tests/test.rem(560): 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(554): Trig = Sunday, 17 February, 1991 +../tests/test.rem(560): 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(554): Trig = Monday, 18 February, 1991 +../tests/test.rem(560): 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(554): Trig = Tuesday, 19 February, 1991 +../tests/test.rem(560): 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(554): Trig = Wednesday, 20 February, 1991 +../tests/test.rem(560): 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(554): Trig = Thursday, 21 February, 1991 +../tests/test.rem(560): 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(554): Trig = Friday, 22 February, 1991 +../tests/test.rem(560): 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(554): Trig = Saturday, 23 February, 1991 +../tests/test.rem(560): 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(554): Trig = Sunday, 24 February, 1991 +../tests/test.rem(560): 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(554): Trig = Monday, 25 February, 1991 +../tests/test.rem(560): 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(554): Trig = Tuesday, 26 February, 1991 +../tests/test.rem(560): 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(554): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(560): 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(554): Trig = Thursday, 28 February, 1991 +../tests/test.rem(560): 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(554): Trig = Friday, 1 March, 1991 +../tests/test.rem(560): 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(554): Trig = Saturday, 2 March, 1991 +../tests/test.rem(560): 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(554): Trig = Sunday, 3 March, 1991 +../tests/test.rem(560): 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(554): Trig = Monday, 4 March, 1991 +../tests/test.rem(560): 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(554): Trig = Tuesday, 5 March, 1991 +../tests/test.rem(560): 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(554): Trig = Wednesday, 6 March, 1991 +../tests/test.rem(560): 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(554): Trig = Thursday, 7 March, 1991 +../tests/test.rem(560): 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(554): Trig = Friday, 8 March, 1991 +../tests/test.rem(560): 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(554): Trig = Saturday, 9 March, 1991 +../tests/test.rem(560): 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(554): Trig = Sunday, 10 March, 1991 +../tests/test.rem(560): 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(554): Trig = Monday, 11 March, 1991 +../tests/test.rem(560): 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(554): Trig(satisfied) = Monday, 11 March, 1991 +../tests/test.rem(560): 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(557): Trig = Thursday, 14 March, 1991 +../tests/test.rem(563): Trig = Thursday, 14 March, 1991 $Tw => 4 4 == 4 => 1 -../tests/test.rem(557): Trig(satisfied) = Thursday, 14 March, 1991 +../tests/test.rem(563): Trig(satisfied) = Thursday, 14 March, 1991 REM 14 AT 16:00 DURATION 8:00 SATISFY [$Tw == 4] MSG Thursday, the 14th -../tests/test.rem(558): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:00 +../tests/test.rem(564): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:00 $Tw => 4 4 == 4 => 1 -../tests/test.rem(558): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 08:00 +../tests/test.rem(564): 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(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 +../tests/test.rem(565): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 +../tests/test.rem(565): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 $Tw => 4 4 == 4 => 1 -../tests/test.rem(559): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 08:01 +../tests/test.rem(565): 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(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 +../tests/test.rem(566): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 +../tests/test.rem(566): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 $Tw => 4 4 == 4 => 1 -../tests/test.rem(560): Trig(satisfied) = Thursday, 14 March, 1991 AT 16:00 DURATION 32:00 +../tests/test.rem(566): 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(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 +../tests/test.rem(567): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 32:01 +../tests/test.rem(567): Trig = Thursday, 14 February, 1991 AT 16:00 DURATION 32:01 $Tw => 4 4 == 4 => 1 -../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 +../tests/test.rem(567): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 00:01 +../tests/test.rem(567): 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(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 +../tests/test.rem(568): Trig = Thursday, 14 March, 1991 AT 16:00 DURATION 40:00 +../tests/test.rem(568): Trig = Thursday, 14 February, 1991 AT 16:00 DURATION 40:00 $Tw => 4 4 == 4 => 1 -../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 +../tests/test.rem(568): Trig(adj) = Saturday, 16 February, 1991 AT 00:00 DURATION 08:00 +../tests/test.rem(568): 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(565): Cannot specify DURATION without specifying AT +../tests/test.rem(571): Cannot specify DURATION without specifying AT # Parsing of AM/PM times REM AT 0:00am MSG foo 0a -../tests/test.rem(568): Expecting time after AT +../tests/test.rem(574): Expecting time after AT REM AT 1:00AM MSG foo 1a -../tests/test.rem(569): Trig = Saturday, 16 February, 1991 AT 01:00 +../tests/test.rem(575): Trig = Saturday, 16 February, 1991 AT 01:00 foo 1a REM AT 2:00am MSG foo 2a -../tests/test.rem(570): Trig = Saturday, 16 February, 1991 AT 02:00 +../tests/test.rem(576): Trig = Saturday, 16 February, 1991 AT 02:00 foo 2a REM AT 3:00AM MSG foo 3a -../tests/test.rem(571): Trig = Saturday, 16 February, 1991 AT 03:00 +../tests/test.rem(577): Trig = Saturday, 16 February, 1991 AT 03:00 foo 3a REM AT 4:00am MSG foo 4a -../tests/test.rem(572): Trig = Saturday, 16 February, 1991 AT 04:00 +../tests/test.rem(578): Trig = Saturday, 16 February, 1991 AT 04:00 foo 4a REM AT 5:00AM MSG foo 5a -../tests/test.rem(573): Trig = Saturday, 16 February, 1991 AT 05:00 +../tests/test.rem(579): Trig = Saturday, 16 February, 1991 AT 05:00 foo 5a REM AT 6:00am MSG foo 6a -../tests/test.rem(574): Trig = Saturday, 16 February, 1991 AT 06:00 +../tests/test.rem(580): Trig = Saturday, 16 February, 1991 AT 06:00 foo 6a REM AT 7:00AM MSG foo 7a -../tests/test.rem(575): Trig = Saturday, 16 February, 1991 AT 07:00 +../tests/test.rem(581): Trig = Saturday, 16 February, 1991 AT 07:00 foo 7a REM AT 8:00am MSG foo 8a -../tests/test.rem(576): Trig = Saturday, 16 February, 1991 AT 08:00 +../tests/test.rem(582): Trig = Saturday, 16 February, 1991 AT 08:00 foo 8a REM AT 9:00AM MSG foo 9a -../tests/test.rem(577): Trig = Saturday, 16 February, 1991 AT 09:00 +../tests/test.rem(583): Trig = Saturday, 16 February, 1991 AT 09:00 foo 9a REM AT 10:00am MSG foo 10a -../tests/test.rem(578): Trig = Saturday, 16 February, 1991 AT 10:00 +../tests/test.rem(584): Trig = Saturday, 16 February, 1991 AT 10:00 foo 10a REM AT 11:00AM MSG foo 11a -../tests/test.rem(579): Trig = Saturday, 16 February, 1991 AT 11:00 +../tests/test.rem(585): Trig = Saturday, 16 February, 1991 AT 11:00 foo 11a REM AT 12:00am MSG foo 12a -../tests/test.rem(580): Trig = Saturday, 16 February, 1991 AT 00:00 +../tests/test.rem(586): Trig = Saturday, 16 February, 1991 AT 00:00 foo 12a REM AT 13:00AM MSG foo 13a -../tests/test.rem(581): Expecting time after AT +../tests/test.rem(587): Expecting time after AT REM AT 0:00pm MSG foo 0p -../tests/test.rem(582): Expecting time after AT +../tests/test.rem(588): Expecting time after AT REM AT 1:00PM MSG foo 1p -../tests/test.rem(583): Trig = Saturday, 16 February, 1991 AT 13:00 +../tests/test.rem(589): Trig = Saturday, 16 February, 1991 AT 13:00 foo 1p REM AT 2:00pm MSG foo 2p -../tests/test.rem(584): Trig = Saturday, 16 February, 1991 AT 14:00 +../tests/test.rem(590): Trig = Saturday, 16 February, 1991 AT 14:00 foo 2p REM AT 3:00PM MSG foo 3p -../tests/test.rem(585): Trig = Saturday, 16 February, 1991 AT 15:00 +../tests/test.rem(591): Trig = Saturday, 16 February, 1991 AT 15:00 foo 3p REM AT 4:00pm MSG foo 4p -../tests/test.rem(586): Trig = Saturday, 16 February, 1991 AT 16:00 +../tests/test.rem(592): Trig = Saturday, 16 February, 1991 AT 16:00 foo 4p REM AT 5:00PM MSG foo 5p -../tests/test.rem(587): Trig = Saturday, 16 February, 1991 AT 17:00 +../tests/test.rem(593): Trig = Saturday, 16 February, 1991 AT 17:00 foo 5p REM AT 6:00pm MSG foo 6p -../tests/test.rem(588): Trig = Saturday, 16 February, 1991 AT 18:00 +../tests/test.rem(594): Trig = Saturday, 16 February, 1991 AT 18:00 foo 6p REM AT 7:00PM MSG foo 7p -../tests/test.rem(589): Trig = Saturday, 16 February, 1991 AT 19:00 +../tests/test.rem(595): Trig = Saturday, 16 February, 1991 AT 19:00 foo 7p REM AT 8:00pm MSG foo 8p -../tests/test.rem(590): Trig = Saturday, 16 February, 1991 AT 20:00 +../tests/test.rem(596): Trig = Saturday, 16 February, 1991 AT 20:00 foo 8p REM AT 9:00PM MSG foo 9p -../tests/test.rem(591): Trig = Saturday, 16 February, 1991 AT 21:00 +../tests/test.rem(597): Trig = Saturday, 16 February, 1991 AT 21:00 foo 9p REM AT 10:00pm MSG foo 10p -../tests/test.rem(592): Trig = Saturday, 16 February, 1991 AT 22:00 +../tests/test.rem(598): Trig = Saturday, 16 February, 1991 AT 22:00 foo 10p REM AT 11:00PM MSG foo 11p -../tests/test.rem(593): Trig = Saturday, 16 February, 1991 AT 23:00 +../tests/test.rem(599): Trig = Saturday, 16 February, 1991 AT 23:00 foo 11p REM AT 12:00pm MSG foo 12p -../tests/test.rem(594): Trig = Saturday, 16 February, 1991 AT 12:00 +../tests/test.rem(600): Trig = Saturday, 16 February, 1991 AT 12:00 foo 12p REM AT 13:00PM MSG foo 13p -../tests/test.rem(595): Expecting time after AT +../tests/test.rem(601): Expecting time after AT DEBUG +x SET x 0:00am + 0 -../tests/test.rem(598): Ill-formed time +../tests/test.rem(604): Ill-formed time SET x 1:00AM + 0 01:00 + 0 => 01:00 SET x 2:00am + 0 @@ -3466,10 +3478,10 @@ SET x 11:00AM + 0 SET x 12:00am + 0 00:00 + 0 => 00:00 SET x 13:00AM + 0 -../tests/test.rem(611): Ill-formed time +../tests/test.rem(617): Ill-formed time SET x 0:00pm + 0 -../tests/test.rem(613): Ill-formed time +../tests/test.rem(619): Ill-formed time SET x 1:00PM + 0 13:00 + 0 => 13:00 SET x 2:00pm + 0 @@ -3495,10 +3507,10 @@ SET x 11:00PM + 0 SET x 12:00pm + 0 12:00 + 0 => 12:00 SET x 13:00PM + 0 -../tests/test.rem(626): Ill-formed time +../tests/test.rem(632): Ill-formed time SET x '2015-02-03@0:00am' + 0 -../tests/test.rem(628): Ill-formed time +../tests/test.rem(634): 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 @@ -3524,10 +3536,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(641): Ill-formed time +../tests/test.rem(647): Ill-formed time SET x '2015-02-03@0:00pm' + 0 -../tests/test.rem(643): Ill-formed time +../tests/test.rem(649): 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 @@ -3553,7 +3565,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(656): Ill-formed time +../tests/test.rem(662): Ill-formed time # Test the ampm function set x ampm(0:12) + "" @@ -3649,88 +3661,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(695): `-': Number too high +../tests/test.rem(701): `-': Number too high set a $IntMin - $IntMax $IntMin => -2147483648 $IntMax => 2147483647 -2147483648 - 2147483647 => Number too high -../tests/test.rem(696): `-': Number too high +../tests/test.rem(702): `-': Number too high set a $IntMax - $IntMin $IntMax => 2147483647 $IntMin => -2147483648 2147483647 - -2147483648 => Number too high -../tests/test.rem(697): `-': Number too high +../tests/test.rem(703): `-': Number too high set a $IntMax - (-1) $IntMax => 2147483647 - 1 => -1 2147483647 - -1 => Number too high -../tests/test.rem(698): `-': Number too high +../tests/test.rem(704): `-': Number too high set a $IntMax + 1 $IntMax => 2147483647 2147483647 + 1 => Number too high -../tests/test.rem(699): `+': Number too high +../tests/test.rem(705): `+': Number too high set a $IntMax + $IntMax $IntMax => 2147483647 $IntMax => 2147483647 2147483647 + 2147483647 => Number too high -../tests/test.rem(700): `+': Number too high +../tests/test.rem(706): `+': Number too high set a $IntMin + (-1) $IntMin => -2147483648 - 1 => -1 -2147483648 + -1 => Number too high -../tests/test.rem(701): `+': Number too high +../tests/test.rem(707): `+': Number too high set a $IntMin + $IntMin $IntMin => -2147483648 $IntMin => -2147483648 -2147483648 + -2147483648 => Number too high -../tests/test.rem(702): `+': Number too high +../tests/test.rem(708): `+': Number too high set a $IntMax * 2 $IntMax => 2147483647 2147483647 * 2 => Number too high -../tests/test.rem(703): `*': Number too high +../tests/test.rem(709): `*': Number too high set a $IntMax * $IntMax $IntMax => 2147483647 $IntMax => 2147483647 2147483647 * 2147483647 => Number too high -../tests/test.rem(704): `*': Number too high +../tests/test.rem(710): `*': Number too high set a $IntMax * $IntMin $IntMax => 2147483647 $IntMin => -2147483648 2147483647 * -2147483648 => Number too high -../tests/test.rem(705): `*': Number too high +../tests/test.rem(711): `*': Number too high set a $IntMin * 2 $IntMin => -2147483648 -2147483648 * 2 => Number too high -../tests/test.rem(706): `*': Number too high +../tests/test.rem(712): `*': Number too high set a $IntMin * $IntMin $IntMin => -2147483648 $IntMin => -2147483648 -2147483648 * -2147483648 => Number too high -../tests/test.rem(707): `*': Number too high +../tests/test.rem(713): `*': Number too high set a $IntMin * $IntMax $IntMin => -2147483648 $IntMax => 2147483647 -2147483648 * 2147483647 => Number too high -../tests/test.rem(708): `*': Number too high +../tests/test.rem(714): `*': 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(715): `/': Number too high set a $IntMin * (-1) $IntMin => -2147483648 - 1 => -1 -2147483648 * -1 => Number too high -../tests/test.rem(710): `*': Number too high +../tests/test.rem(716): `*': Number too high set a (-1) * $IntMin - 1 => -1 $IntMin => -2147483648 -1 * -2147483648 => Number too high -../tests/test.rem(711): `*': Number too high +../tests/test.rem(717): `*': Number too high set a abs($IntMin) $IntMin => -2147483648 abs(-2147483648) => Number too high -../tests/test.rem(712): Number too high +../tests/test.rem(718): Number too high # The "isany" function set a isany(1) @@ -3757,17 +3769,17 @@ set a shellescape(" !\"#$%%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ shellescape(" !\"#$%%&'()*+,-./0123456789:;<=>?@ABCDEF"...) => "\\ \\!\\\"\\#\\$\\%\\%\\&\\'\\(\\)\\*+,-./0123456789\\"... msg [a] -../tests/test.rem(728): Trig = Saturday, 16 February, 1991 +../tests/test.rem(734): Trig = Saturday, 16 February, 1991 a => "\\ \\!\\\"\\#\\$\\%\\%\\&\\'\\(\\)\\*+,-./0123456789\\"... \ \!\"\#\$\\\&\'\(\)\*+,-./0123456789\:\;\<=\>\?@ABCDEFGHIJKLMNOPQRSTUVWXYZ\[\\\]\^_\`abcdefghijklmnopqrstuvwxyz\{\|\}\~ # Deprecated functions set x psshade(50) -psshade(50) => ../tests/test.rem(731): psshade() is deprecated; use SPECIAL SHADE instead. +psshade(50) => ../tests/test.rem(737): 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(732): psmoon() is deprecated; use SPECIAL MOON instead. +psmoon(0) => ../tests/test.rem(738): psmoon() is deprecated; use SPECIAL MOON instead. "gsave 0 setgray newpath Border DaySize 2"... # Recursive expression evaluation @@ -3776,24 +3788,24 @@ SET tmp evaltrig("Wed SKIP OMITFUNC _f",date(1992,1,8)) date(1992, 1, 8) => 1992-01-08 evaltrig("Wed SKIP OMITFUNC _f", 1992-01-08) => Entering UserFN _f(1992-01-08) Leaving UserFN _f() => 0 -../tests/test.rem(736): Trig = Wednesday, 8 January, 1992 +../tests/test.rem(742): Trig = Wednesday, 8 January, 1992 1992-01-08 REM MSG [tmp] -../tests/test.rem(737): Trig = Saturday, 16 February, 1991 +../tests/test.rem(743): Trig = Saturday, 16 February, 1991 tmp => 1992-01-08 1992-01-08 # Trig IF trig("sun +1") || trig("thu +1") -trig("sun +1") => ../tests/test.rem(740): Trig = Sunday, 17 February, 1991 +trig("sun +1") => ../tests/test.rem(746): Trig = Sunday, 17 February, 1991 1991-02-17 -trig("thu +1") => ../tests/test.rem(740): Trig = Thursday, 21 February, 1991 +trig("thu +1") => ../tests/test.rem(746): 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(741): Trig = Sunday, 17 February, 1991 +../tests/test.rem(747): Trig = Sunday, 17 February, 1991 Foo tomorrow ENDIF @@ -3801,15 +3813,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(746): Trig = Sunday, 17 February, 1991 +trig("sun warn w") => ../tests/test.rem(752): Trig = Sunday, 17 February, 1991 Entering UserFN w(1) x => 1 1 / 0 => Division by zero -../tests/test.rem(746): -../tests/test.rem(745): In function `w': `/': Division by zero +../tests/test.rem(752): +../tests/test.rem(751): In function `w': `/': Division by zero Leaving UserFN w() => Division by zero 1990-01-01 -trig("thu warn w") => ../tests/test.rem(746): Trig = Thursday, 21 February, 1991 +trig("thu warn w") => ../tests/test.rem(752): Trig = Thursday, 21 February, 1991 Entering UserFN w(1) x => 1 1 / 0 => Division by zero @@ -3825,7 +3837,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(755): Trig = Sunday, 17 February, 1991 +trig("sun warn w") => ../tests/test.rem(761): Trig = Sunday, 17 February, 1991 Entering UserFN w(1) x => 1 choose(1, 5, 3, 1, 0) => 5 @@ -3839,7 +3851,7 @@ x => 3 choose(3, 5, 3, 1, 0) => 1 Leaving UserFN w() => 1 1991-02-17 -trig("thu warn w") => ../tests/test.rem(755): Trig = Thursday, 21 February, 1991 +trig("thu warn w") => ../tests/test.rem(761): Trig = Thursday, 21 February, 1991 Entering UserFN w(1) x => 1 choose(1, 5, 3, 1, 0) => 5 @@ -3848,92 +3860,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(756): Trig = Thursday, 21 February, 1991 +../tests/test.rem(762): 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(759): Trig = Monday, 18 February, 1991 -../tests/test.rem(759): Trig = Tuesday, 19 February, 1991 -../tests/test.rem(759): Trig = Wednesday, 20 February, 1991 -../tests/test.rem(759): Trig = Saturday, 16 February, 1991 +trig("Mon", "Tue", "Wed", "Sat") => ../tests/test.rem(765): Trig = Monday, 18 February, 1991 +../tests/test.rem(765): Trig = Tuesday, 19 February, 1991 +../tests/test.rem(765): Trig = Wednesday, 20 February, 1991 +../tests/test.rem(765): Trig = Saturday, 16 February, 1991 1991-02-16 -../tests/test.rem(759): Trig = Saturday, 16 February, 1991 +../tests/test.rem(765): Trig = Saturday, 16 February, 1991 foo REM [trig("Mon", "Tue", "Wed")] MSG bar -trig("Mon", "Tue", "Wed") => ../tests/test.rem(760): Trig = Monday, 18 February, 1991 -../tests/test.rem(760): Trig = Tuesday, 19 February, 1991 -../tests/test.rem(760): Trig = Wednesday, 20 February, 1991 +trig("Mon", "Tue", "Wed") => ../tests/test.rem(766): Trig = Monday, 18 February, 1991 +../tests/test.rem(766): Trig = Tuesday, 19 February, 1991 +../tests/test.rem(766): Trig = Wednesday, 20 February, 1991 1990-01-01 -../tests/test.rem(760): Expired +../tests/test.rem(766): Expired # The new syntactic sugar REM First Monday January MSG x -../tests/test.rem(763): Trig = Monday, 6 January, 1992 +../tests/test.rem(769): Trig = Monday, 6 January, 1992 REM Second Tuesday in April MSG x -../tests/test.rem(764): Trig = Tuesday, 9 April, 1991 +../tests/test.rem(770): Trig = Tuesday, 9 April, 1991 REM Third Wednesday in October MSG x -../tests/test.rem(765): Trig = Wednesday, 16 October, 1991 +../tests/test.rem(771): Trig = Wednesday, 16 October, 1991 REM Fourth Friday in July MSG x -../tests/test.rem(766): Trig = Friday, 26 July, 1991 +../tests/test.rem(772): Trig = Friday, 26 July, 1991 REM Last Tuesday in August MSG x -../tests/test.rem(767): Trig = Tuesday, 27 August, 1991 +../tests/test.rem(773): Trig = Tuesday, 27 August, 1991 REM Last Sunday in December MSG x -../tests/test.rem(768): Trig = Sunday, 29 December, 1991 +../tests/test.rem(774): Trig = Sunday, 29 December, 1991 REM First Monday January 2000 MSG x -../tests/test.rem(770): Trig = Monday, 3 January, 2000 +../tests/test.rem(776): Trig = Monday, 3 January, 2000 REM Second Tuesday in April 2000 MSG x -../tests/test.rem(771): Trig = Tuesday, 11 April, 2000 +../tests/test.rem(777): Trig = Tuesday, 11 April, 2000 REM Third Wednesday in October 2000 MSG x -../tests/test.rem(772): Trig = Wednesday, 18 October, 2000 +../tests/test.rem(778): Trig = Wednesday, 18 October, 2000 REM Fourth Friday in July 2000 MSG x -../tests/test.rem(773): Trig = Friday, 28 July, 2000 +../tests/test.rem(779): Trig = Friday, 28 July, 2000 REM Last Tuesday in August 2000 MSG x -../tests/test.rem(774): Trig = Tuesday, 29 August, 2000 +../tests/test.rem(780): Trig = Tuesday, 29 August, 2000 REM Last Sunday in December 2000 MSG x -../tests/test.rem(775): Trig = Sunday, 31 December, 2000 +../tests/test.rem(781): Trig = Sunday, 31 December, 2000 REM January ~~1 MSG y -../tests/test.rem(777): Trig = Friday, 31 January, 1992 +../tests/test.rem(783): Trig = Friday, 31 January, 1992 REM February ~~1 MSG y -../tests/test.rem(778): Trig = Thursday, 28 February, 1991 +../tests/test.rem(784): Trig = Thursday, 28 February, 1991 REM February ~~2 MSG y -../tests/test.rem(779): Trig = Wednesday, 27 February, 1991 +../tests/test.rem(785): Trig = Wednesday, 27 February, 1991 REM February ~~3 MSG y -../tests/test.rem(780): Trig = Tuesday, 26 February, 1991 +../tests/test.rem(786): Trig = Tuesday, 26 February, 1991 REM February ~~8 MSG y -../tests/test.rem(781): Trig = Thursday, 21 February, 1991 +../tests/test.rem(787): Trig = Thursday, 21 February, 1991 REM February ~~20 MSG y -../tests/test.rem(782): Trig = Monday, 10 February, 1992 +../tests/test.rem(788): Trig = Monday, 10 February, 1992 PUSH OMIT 31 March REM March ~1 MSG y -../tests/test.rem(785): Trig = Saturday, 30 March, 1991 +../tests/test.rem(791): Trig = Saturday, 30 March, 1991 REM March ~~1 MSG y -../tests/test.rem(786): Trig = Sunday, 31 March, 1991 +../tests/test.rem(792): Trig = Sunday, 31 March, 1991 REM Lastday March MSG y -../tests/test.rem(787): Trig = Sunday, 31 March, 1991 +../tests/test.rem(793): Trig = Sunday, 31 March, 1991 REM Lastworkday March MSG y -../tests/test.rem(788): Trig = Saturday, 30 March, 1991 +../tests/test.rem(794): Trig = Saturday, 30 March, 1991 POP REM Dec 2000 ~~1 MSG y -../tests/test.rem(790): Trig = Sunday, 31 December, 2000 +../tests/test.rem(796): Trig = Sunday, 31 December, 2000 REM Dec 2000 ~~2 MSG y -../tests/test.rem(791): Trig = Saturday, 30 December, 2000 +../tests/test.rem(797): Trig = Saturday, 30 December, 2000 REM Dec 2000 ~~3 MSG y -../tests/test.rem(792): Trig = Friday, 29 December, 2000 +../tests/test.rem(798): Trig = Friday, 29 December, 2000 REM Dec 2000 ~~7 MSG y -../tests/test.rem(793): Trig = Monday, 25 December, 2000 +../tests/test.rem(799): Trig = Monday, 25 December, 2000 REM Jan 2001 ~~1 MSG y -../tests/test.rem(794): Trig = Wednesday, 31 January, 2001 +../tests/test.rem(800): Trig = Wednesday, 31 January, 2001 REM Lastday April 2022 OMIT SAT SUN MSG foo -../tests/test.rem(796): Trig = Saturday, 30 April, 2022 +../tests/test.rem(802): Trig = Saturday, 30 April, 2022 REM Lastworkday April 2022 OMIT SAT SUN MSG foo -../tests/test.rem(797): Trig = Friday, 29 April, 2022 +../tests/test.rem(803): Trig = Friday, 29 April, 2022 SET a pad(1, "0", 2) pad(1, "0", 2) => "01" @@ -3951,7 +3963,7 @@ set a pad("foo", "0", $MaxStringLen+1) $MaxStringLen => 65535 65535 + 1 => 65536 pad("foo", "0", 65536) => String too long -../tests/test.rem(805): String too long +../tests/test.rem(811): String too long # Test OMIT CLEAR-OMIT-CONTEXT @@ -3961,7 +3973,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(814): Bad date specification +../tests/test.rem(820): Bad date specification OMIT DUMP Global Full OMITs (11 of maximum allowed 1000): @@ -4058,12 +4070,14 @@ Global Partial OMITs (81 of maximum allowed 366): 09-08 09-09 09-10 +Globally omitted weekdays: + None. CLEAR-OMIT-CONTEXT OMIT 2000-01-01 THROUGH 2020-12-31 -../tests/test.rem(818): Too many full OMITs +../tests/test.rem(824): Too many full OMITs OMIT Dec 5 2029 through Dec 4 2029 -../tests/test.rem(820): Error: THROUGH date earlier than start date +../tests/test.rem(826): Error: THROUGH date earlier than start date # Don't want Remind to queue reminders EXIT diff --git a/tests/test.rem b/tests/test.rem index 4528d460..edeeb083 100644 --- a/tests/test.rem +++ b/tests/test.rem @@ -146,8 +146,14 @@ REM Tue 28 Jan 1992 MSG Tue 28 Jan 1992 # Try some Backs CLEAR-OMIT-CONTEXT -REM 1 -1 OMIT sat sun MSG 1 -1 OMIT Sat Sun -REM 1 --1 OMIT sat sun MSG 1 --1 OMIT Sat Sun +REM 1 -1 OMIT thu MSG 1 -1 OMIT Thu +REM 1 --1 OMIT thu MSG 1 --1 OMIT Thu + +PUSH-OMIT-CONTEXT +OMIT Thu +REM 1 -1 MSG 1 -1 OMIT Thu globally +REM 1 --1 MSG 1 --1 OMIT Thu globally +POP-OMIT-CONTEXT OMIT 28 Feb REM 1 -1 OMIT sat sun MSG 1 -1 OMIT Sat Sun (28 Feb omitted)