diff options
-rw-r--r-- | module/ice-9/boot-9.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm index 46adc512b..0c82a3bcf 100644 --- a/module/ice-9/boot-9.scm +++ b/module/ice-9/boot-9.scm @@ -544,7 +544,7 @@ If there is no handler at all, Guile prints an error and then exits." (define (syntax-error-printer port key args default-printer) (apply (case-lambda - ((who what where form subform extra) + ((who what where form subform . extra) (format port "Syntax error:\n") (if where (let ((file (or (assq-ref where 'filename) "unknown file")) |