brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Remove exception raising in period converter.

Browse source
This commit is contained in:
Dominik Pantůček 2023-03-25 20:24:21 +01:00
parent 0dd4b6aed4
commit dcbac91f55
1 changed files with 4 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

10
period.scm
View file

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