diff options
Diffstat (limited to 'tests/rrule-parse.scm')
| -rw-r--r-- | tests/rrule-parse.scm | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/tests/rrule-parse.scm b/tests/rrule-parse.scm index c10266aa..f1d02d27 100644 --- a/tests/rrule-parse.scm +++ b/tests/rrule-parse.scm @@ -11,8 +11,6 @@ (test-equal (make-recur-rule freq: 'HOURLY count: 3 interval: 1 wkst: mon) (parse-recurrence-rule "FREQ=HOURLY;COUNT=3")) -;;; TODO write tests for these cases - (parameterize ((warnings-are-errors #t) (warning-handler identity)) ; silence warnings (test-error "Invalid FREQ" 'warning @@ -24,14 +22,3 @@ (test-error "Invalid COUNT" 'wrong-type-argument (parse-recurrence-rule "FREQ=HOURLY;COUNT=err")) ) - ; TODO this error seems to have an error -;; => #<<recur-rule> freq: #<<recur-rule> freq: #f until: #f count: #f interval: 1 bysecond: #f byminute: #f byhour: #f byday: #f bymonthday: #f byyearday: #f byweekno: #f bymonth: #f bysetpos: #f wkst: MO> until: #f count: 3 interval: 1 bysecond: #f byminute: #f byhour: #f byday: #f bymonthday: #f byyearday: #f byweekno: #f bymonth: #f bysetpos: #f wkst: MO> -;; ERR unfulfilled-constraint [ERR] doesn't fulfill constraint of type [FREQ], ignoring - -;; => #<<recur-rule> freq: HOURLY until: #f count: #f interval: 1 -;; bysecond: #f byminute: #f byhour: #f byday: #f bymonthday: #f -;; byyearday: #f byweekno: #f bymonth: #f bysetpos: #f wkst: MO> -;; ERR invalid-value [#f] for key [COUNT], ignoring. - -;; => #<<recur-rule> freq: HOURLY until: #f count: #<<recur-rule> freq: HOURLY until: #f count: #f interval: 1 bysecond: #f byminute: #f byhour: #f byday: #f bymonthday: #f byyearday: #f byweekno: #f bymonth: #f bysetpos: #f wkst: MO> interval: 1 bysecond: #f byminute: #f byhour: #f byday: #f bymonthday: #f byyearday: #f byweekno: #f bymonth: #f bysetpos: #f wkst: MO> -;; ERR unfulfilled-constraint [-1] doesn't fulfill constraint of type [COUNT], ignoring |