suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix bug that triggers due to missing super-new

Browse Source
This commit is contained in:
Asumu Takikawa 2013-05-21 16:30:09 -04:00
parent c009948627
commit ab8513f48d
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
pkgs/typed-racket-pkgs/typed-racket-lib/typed-racket/typecheck/check-class-unit.rkt
View File

@ -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)