(((vcomponent recurrence parse) parse-recurrence-rule)
 ((vcomponent recurrence internal)
  make-recur-rule weekdays intervals))


(test-equal
    (make-recur-rule freq: 'DAILY wkst: 'MO interval: 1)
  (parse-recurrence-rule "FREQ=DAILY"))

(test-equal
    (make-recur-rule freq: 'WEEKLY wkst: 'MO interval: 1)
  (parse-recurrence-rule "FREQ=WEEKLY"))

;; TODO more tests