Remove exception raising in period converter.

This commit is contained in:
Dominik Pantůček 2023-03-25 20:24:21 +01:00
parent 0dd4b6aed4
commit dcbac91f55

View file

@ -82,12 +82,10 @@
(loop (cdr l)
ps
month))
(if (eq? (*member-file-check-syntax*) 'error)
(error 'period-markers->periods "Invalid start/stop sequence marker" marker)
(list #f
(reverse ps)
(sprintf "Invalid start/stop sequence marker ~A" marker)
line-number)))))))
line-number))))))
;; Returns duration of period in months. Start is included, end is
;; not. The period contains the month just before the specified end.