This commit is contained in:
Jon Rafkind 2010-05-06 19:31:24 -06:00
parent 837f1e24e5
commit 177141a852

View File

@ -424,7 +424,6 @@
(define (X) (raise-syntax-error (syntax->datum #'name) "implement for this context"))
(values
;; this is sort of ugly, is there a better way?
;; foo
(cond
[(type-context? ctx) (X)]
[(type-or-expression-context? ctx) (X)]