! Copyright (C) 2009 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
-USING: calendar.holidays calendar.holidays.us kernel sequences
-tools.test ;
+USING: calendar calendar.holidays calendar.holidays.us kernel
+sequences tools.test ;
+
+{ 11 } [ 2022 us-federal holidays length ] unit-test
+
+{
+ {
+ T{ timestamp { year 2022 } { month 1 } { day 1 } }
+ T{ timestamp { year 2022 } { month 1 } { day 17 } }
+ T{ timestamp { year 2022 } { month 2 } { day 21 } }
+ T{ timestamp { year 2022 } { month 5 } { day 30 } }
+ T{ timestamp { year 2022 } { month 6 } { day 20 } }
+ T{ timestamp { year 2022 } { month 7 } { day 4 } }
+ T{ timestamp { year 2022 } { month 9 } { day 5 } }
+ T{ timestamp { year 2022 } { month 10 } { day 10 } }
+ T{ timestamp { year 2022 } { month 11 } { day 11 } }
+ T{ timestamp { year 2022 } { month 11 } { day 24 } }
+ T{ timestamp { year 2022 } { month 12 } { day 26 } }
+ }
+} [
+ 2022 <year-gmt> timestamp>year-dates-gmt [ us-federal holiday? ] filter
+] unit-test
-{ 10 } [ 2009 us-federal holidays length ] unit-test