]> gitweb.factorcode.org Git - factor.git/commitdiff
calendar: really fix test.
authorJohn Benediktsson <mrjbq7@gmail.com>
Thu, 17 Dec 2020 04:42:48 +0000 (20:42 -0800)
committerJohn Benediktsson <mrjbq7@gmail.com>
Thu, 17 Dec 2020 04:42:48 +0000 (20:42 -0800)
basis/calendar/calendar-tests.factor

index ba792b4ca225ca71e464aa00d4bd84c051a5daa8..d60366a360ecde41741156de84cf07e398b7242b 100644 (file)
@@ -207,7 +207,9 @@ IN: calendar
     2008 2 29 <date> =
 ] unit-test
 
-{ { 1 1 1 2 2 2 3 3 3 4 4 4 } } [ 12 [1,b] [ quarter ] map ] unit-test
+{ { 1 1 1 2 2 2 3 3 3 4 4 4 } } [
+    12 [1,b] [ 2020 swap 1 <date> quarter ] map
+] unit-test
 
 { 0 }
 [ now-gmt gmt-offset>> duration>seconds ] unit-test