diff --git a/collects/scheme/private/norm-define.ss b/collects/scheme/private/norm-define.ss index 20af4ab5d9..f015b6eb6e 100644 --- a/collects/scheme/private/norm-define.ss +++ b/collects/scheme/private/norm-define.ss @@ -22,7 +22,7 @@ (raise-syntax-error #f (syntax-case stx () - [(_ id expr ...) + [(_ id expr0 expr ...) "bad syntax (multiple expressions after identifier)"] [(_ id) "bad syntax (zero expressions after identifier)"]