X-Git-Url: https://git.distorted.org.uk/~mdw/ca/blobdiff_plain/0f9d9bad47d069fb05f3f1d937c42125a14c95ea..4b6fce84405471664e10294545eac11921952cc4:/test/unit diff --git a/test/unit b/test/unit index 73c01ae..9667478 100755 --- a/test/unit +++ b/test/unit @@ -1,4 +1,4 @@ -#! /usr/bin/tclsh8.5 +#! /usr/bin/tclsh ### -*-tcl-*- source [file join [file dirname $argv0] "../lib/func.tcl"] @@ -67,6 +67,8 @@ test next-matching-date {pat ref want} { {"*-*-* *:19:05" "2012-12-04 00:19:06" "2012-12-04 01:19:05"} {"*-*-31 01:02:03" "2012-11-03 04:05:06" "2012-12-31 01:02:03"} {"*/2-*/3-*/5 */7:*/11:*/13" "2011-12-04 00:00:04" "2012-03-05 00:00:00"} + {"*-03-01 00:00:00" "2020-05-14 13:44:09" "2021-03-01 00:00:00"} + {"*-03-01 00:00:00" "2021-03-01 00:25:04" "2022-03-01 00:00:00"} }