Rename identifiers.

This commit is contained in:
Dominik Pantůček 2023-05-09 19:41:57 +02:00
parent 1fdfaee662
commit 95640fbff7

View file

@ -225,7 +225,10 @@
(run-tests (run-tests
period period
(test-equal? sort-period-markers (test-equal? sort-period-markers
(sort-period-markers '((start (2023 1)) (stop (2022 10)) (start (2022 3)))) (sort-period-markers
`((start ,(make-cal-month 2023 1))
(stop ,(make-cal-month 2022 10))
(start ,(make-cal-month 2022 3))))
'((start (2022 3)) (stop (2022 10)) (start (2023 1)))) '((start (2022 3)) (stop (2022 10)) (start (2023 1))))
(test-equal? period-markers->cal-periods (test-equal? period-markers->cal-periods
(period-markers->cal-periods (period-markers->cal-periods