diff options
Diffstat (limited to '')
-rw-r--r-- | tests/recurrence-advanced.scm (renamed from tests/recurrence.scm) | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/tests/recurrence.scm b/tests/recurrence-advanced.scm index 6ced6af0..c2242c19 100644 --- a/tests/recurrence.scm +++ b/tests/recurrence-advanced.scm @@ -1,9 +1,20 @@ ;;; Commentary: +;; Tests of recurrence rule generation with focus on correct instances +;; being generated. For tests of basic recurrence functionallity, see +;; recurrence-simple.scm. +;; +;; This file also tests format-recurrence-rule, which checks that human +;; readable representations of the RRULES work. +;; +;; Also contains the tests for EXDATE. +;; +;; Most examples copied from RFC5545, some home written. +;;; Code: + ;; The human readable tests are expected to fail with any change to the ;; text creator. Proof-read them manually, and update the test cases ;; to match. `x-summary' used for target string. Target strings should ;; be in swedish. -;;; Code: (((vcomponent recurrence parse) parse-recurrence-rule) ((vcomponent recurrence generate) generate-recurrence-set) @@ -16,8 +27,6 @@ ((srfi srfi-41) stream->list) ((srfi srfi-88) keyword->string)) -;; Examples copied from RFC5545 - (define (run-test comp) (test-equal (string-append "RSET: " (prop comp 'SUMMARY)) |