aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2021-01-14 00:11:55 +0100
committerHugo Hörnquist <hugo@lysator.liu.se>2021-01-14 00:11:55 +0100
commit4429b6ab8a8a8ea3b87750b4f6fc152a03aedcc0 (patch)
tree38c05558a9264c061694bdd7ca464018b037e1e5
parentRename recurrence files. (diff)
downloadcalp-4429b6ab8a8a8ea3b87750b4f6fc152a03aedcc0.tar.gz
calp-4429b6ab8a8a8ea3b87750b4f6fc152a03aedcc0.tar.xz
Clarify commentary for recurrence tests.
-rw-r--r--tests/recurrence-advanced.scm11
-rw-r--r--tests/recurrence-simple.scm8
2 files changed, 10 insertions, 9 deletions
diff --git a/tests/recurrence-advanced.scm b/tests/recurrence-advanced.scm
index ceab07cd..c2242c19 100644
--- a/tests/recurrence-advanced.scm
+++ b/tests/recurrence-advanced.scm
@@ -1,11 +1,14 @@
;;; Commentary:
-;; Advanced tests of "generate-recurrence-set", along with
-;; format-recurrence-rule which checks that human readable
-;; representations of the RRULES work.
+;; 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.
;;
-;; Examples copied from RFC5545
+;; Most examples copied from RFC5545, some home written.
;;; Code:
;; The human readable tests are expected to fail with any change to the
diff --git a/tests/recurrence-simple.scm b/tests/recurrence-simple.scm
index 8d930ad1..9c78977b 100644
--- a/tests/recurrence-simple.scm
+++ b/tests/recurrence-simple.scm
@@ -1,9 +1,7 @@
;;; Commentary:
-;; Basic tests that recurrence rule parsing works.
-;; Including that it fails on invalid output.
-;;
-;;
-;; General tests of "generate-recurrence-set".
+;; Simples tests of recurrence system, ensuring that all parsers and
+;; basic generators work. Some more fully-featured tests are here, but
+;; most are instead in recurrence-advanced.scm.
;;; Code:
(((srfi srfi-41) stream-take stream-map stream->list stream-car)