diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-28 09:33:08 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-07-07 21:14:09 +0200 |
commit | 3379e2c4499bf3ca82de7043337e416ef15d24ca (patch) | |
tree | 6d0b9e559f5795d4e7ca7b0d8e5a6044f9356176 /tests/test/recurrence-advanced.scm | |
parent | Clean up crypto test. (diff) | |
download | calp-3379e2c4499bf3ca82de7043337e416ef15d24ca.tar.gz calp-3379e2c4499bf3ca82de7043337e416ef15d24ca.tar.xz |
Various test cleanups.
Diffstat (limited to 'tests/test/recurrence-advanced.scm')
-rw-r--r-- | tests/test/recurrence-advanced.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/test/recurrence-advanced.scm b/tests/test/recurrence-advanced.scm index a68a53b1..a291cc17 100644 --- a/tests/test/recurrence-advanced.scm +++ b/tests/test/recurrence-advanced.scm @@ -34,20 +34,20 @@ :use-module ((srfi srfi-41) :select (stream->list)) :use-module ((srfi srfi-88) :select (keyword->string))) -(test-expect-fail "RSET: The third instance into the month of one of Tuesday, Wednesday, or Thursday, for the next 3 months") +(test-expect-fail "REC: The third instance into the month of one of Tuesday, Wednesday, or Thursday, for the next 3 months") (test-expect-fail "STR: The third instance into the month of one of Tuesday, Wednesday, or Thursday, for the next 3 months") -(test-expect-fail "RSET: The second-to-last weekday of the month") +(test-expect-fail "REC: The second-to-last weekday of the month") (test-expect-fail "STR: The second-to-last weekday of the month") ;; TODO this test is really slow, figure out why (takes approx. 25s to run) -(test-skip "RSET: Every day in January, for 3 years (alt 2)") +(test-skip "REC: Every day in January, for 3 years (alt 2)") (define (run-test comp) (test-equal - (string-append "RSET: " (prop comp 'SUMMARY)) + (string-append "REC: " (prop comp 'SUMMARY)) (prop comp 'X-SET) (let ((r (generate-recurrence-set comp))) (map (extract 'DTSTART) |