diff options
Diffstat (limited to 'module/ice-9/boot-9.scm')
-rw-r--r-- | module/ice-9/boot-9.scm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/module/ice-9/boot-9.scm b/module/ice-9/boot-9.scm index cf0dcd8d8..87c38af8a 100644 --- a/module/ice-9/boot-9.scm +++ b/module/ice-9/boot-9.scm @@ -4328,6 +4328,8 @@ when none is available, reading FILE-NAME with READER." (lambda (formals ...) body ...)) args ...)) + ((_ a (... ...)) + (syntax-violation 'name "Wrong number of arguments" x)) (_ (identifier? x) #'proc-name)))))))))) |