Ignore invalid markers.
This commit is contained in:
parent
bc0420bbc0
commit
056644ff66
2 changed files with 6 additions and 1 deletions
|
@ -78,7 +78,10 @@
|
|||
(loop (cdr l)
|
||||
ps
|
||||
(cdr m)))
|
||||
(error 'period-markers->periods "Invalid start/stop sequence marker" m))))))
|
||||
(if (eq? (*member-file-check-syntax*) 'error)
|
||||
(error 'period-markers->periods "Invalid start/stop sequence marker" m)
|
||||
(reverse ps) ; Just ignore it for now
|
||||
))))))
|
||||
|
||||
;; Returns duration of period in months. Start is included, end is
|
||||
;; not. The period contains the month just before the specified end.
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue