diff --git a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/typecheck/check-class-unit.rkt b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/typecheck/check-class-unit.rkt index b4bc613ce6..b88aad80bc 100644 --- a/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/typecheck/check-class-unit.rkt +++ b/pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/typecheck/check-class-unit.rkt @@ -372,7 +372,8 @@ (define (check-super-new super-new-stx super-inits) (cond [(null? super-new-stx) (tc-error/expr - "typed classes must call super-new at the class top-level")] + "typed classes must call super-new at the class top-level") + null] [else (syntax-parse (car super-new-stx) #:literals (#%plain-app list cons quote)