More debugging.

This commit is contained in:
Dominik Pantůček 2024-01-16 22:13:17 +01:00
parent ba2c753109
commit 707bb1d61e

View file

@ -55,6 +55,7 @@
(if (null? lines) (if (null? lines)
users users
(let ((line (parser-preprocess-line (car lines) #:strip-comments? #f))) (let ((line (parser-preprocess-line (car lines) #:strip-comments? #f)))
(print line)
(if (equal? line "") (if (equal? line "")
(loop (cdr lines) (loop (cdr lines)
users) users)