aboutsummaryrefslogtreecommitdiff
path: root/tests/unit/vcomponent/recurrence-simple.scm
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--tests/unit/vcomponent/recurrence-simple.scm (renamed from tests/test/recurrence-simple.scm)11
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/test/recurrence-simple.scm b/tests/unit/vcomponent/recurrence-simple.scm
index b0c3bdea..31a74989 100644
--- a/tests/test/recurrence-simple.scm
+++ b/tests/unit/vcomponent/recurrence-simple.scm
@@ -90,6 +90,8 @@ END:VEVENT"
(stream->list
(stream-take 5 (day-stream (prop ev 'DTSTART)))))
+(test-assert "Test 1" #t)
+
(define ev
(car
(call-with-input-string
@@ -99,6 +101,8 @@ RRULE:FREQ=DAILY
END:VEVENT"
parse-calendar)))
+(test-assert "Test 2" #t)
+
(test-assert "daily 10:00"
(stream-car (generate-recurrence-set ev)))
@@ -311,3 +315,10 @@ END:VCALENDAR"
;; RRULE:FREQ=DAILY;BYDAY=MO,TU,WE,TH,FR
;; END:VEVENT
;; END:VCALENDAR
+
+;; TODO add remaining rules
+
+
+'((vcomponent recurrence)
+ (vcomponent formats ical parse)
+ (vcomponent formats xcal parse))