diff --git a/racket/collects/racket/private/class-internal.rkt b/racket/collects/racket/private/class-internal.rkt index 86c372084e..8e21efa454 100644 --- a/racket/collects/racket/private/class-internal.rkt +++ b/racket/collects/racket/private/class-internal.rkt @@ -1720,7 +1720,14 @@ #'super-expression #f #f (syntax->list #'(interface-expr ...)) - (syntax->list #'(defn-or-expr ...)))])) + (syntax->list #'(defn-or-expr ...)))] + [(_ super-expression no-parens-interface-expr + defn-or-expr + ...) + (raise-syntax-error 'class* + "expected a sequence of interfaces" + stx + #'no-parens-interface-expr)])) ;; class (lambda (stx) (syntax-case stx ()