diff options
Diffstat (limited to 'module/ice-9/psyntax.scm')
-rw-r--r-- | module/ice-9/psyntax.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/psyntax.scm b/module/ice-9/psyntax.scm index 57ac6a680..b52bb397e 100644 --- a/module/ice-9/psyntax.scm +++ b/module/ice-9/psyntax.scm @@ -3267,7 +3267,7 @@ names." ;; In Guile, (cons #'a #'b) is the same as #'(a . b). (cons #'begin (let lp () - (let ((x (read p))) + (let ((x (read-syntax p))) (if (eof-object? x) #'() (cons (datum->syntax #'filename x) (lp)))))))))))) |