Add tests for weekday? and weekend?

[factor.git] / basis / calendar / calendar-tests.factor

diff --git a/basis/calendar/calendar-tests.factor b/basis/calendar/calendar-tests.factor
index 11690fdb18eb024ea1a6ad574e8e7ae898e620be..5990f83769c5401170066165e57aa7f335bf0b5c 100644 (file)
--- a/basis/calendar/calendar-tests.factor
+++ b/basis/calendar/calendar-tests.factor
@@ -287,6 +287,12 @@ IN: calendar
 { 151 } [ 2014 1 10 <date>  2014 8 9 <date>  weekdays-between ] unit-test
 { 151 } [ 2014 1 10 <date>  2014 8 10 <date>  weekdays-between ] unit-test
 
+{ t } [ 2014 1 10 <date> weekday? ] unit-test
+{ f } [ 2014 1 10 <date> weekend? ] unit-test
+
+{ t } [ 2014 1 11 <date> weekend? ] unit-test
+{ f } [ 2014 1 11 <date> weekday? ] unit-test
+
 
 { t } [
     2014 1 1 <date-gmt>