extra/calendar/holidays/us/us-tests.factor

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