diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-01-13 22:50:51 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-01-13 22:50:51 +0100 |
| commit | 641278c624a3a0c06856656255f648f2cf4f6a92 (patch) | |
| tree | 49c47c4c61dd0704e89cfd75681bc16f171e7ad5 /tests/recurrence.scm | |
| parent | Add debug buttons in popup for dumping xcal and jcal. (diff) | |
| parent | Document (vcompenent control). (diff) | |
| download | calp-641278c624a3a0c06856656255f648f2cf4f6a92.tar.gz calp-641278c624a3a0c06856656255f648f2cf4f6a92.tar.xz | |
Merge branch 'doc' into jcal
Diffstat (limited to '')
| -rw-r--r-- | tests/recurrence.scm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/tests/recurrence.scm b/tests/recurrence.scm index 6ced6af0..ceab07cd 100644 --- a/tests/recurrence.scm +++ b/tests/recurrence.scm @@ -1,9 +1,17 @@ ;;; Commentary: +;; Advanced tests of "generate-recurrence-set", along with +;; format-recurrence-rule which checks that human readable +;; representations of the RRULES work. +;; +;; Also contains the tests for EXDATE. +;; +;; Examples copied from RFC5545 +;;; 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 +24,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)) |