[qif-file.scm] Don't use match as an identifier

It is a (ice-9 match) keyword.
This commit is contained in:
Christopher Lam 2021-01-19 19:30:20 +08:00
parent d1de91916e
commit 1f045eb0a5

View File

@ -54,8 +54,7 @@
(make-regexp "^\\.\\.\\."))
(define (not-bad-numeric-string? input)
(let ((match (regexp-exec qif-bad-numeric-rexp input)))
(if match #f #t)))
(not (regexp-exec qif-bad-numeric-rexp input)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;