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

test

Browse Source
This commit is contained in:
Jon Rafkind 2010-05-06 19:31:24 -06:00
parent 837f1e24e5
commit 177141a852
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
collects/honu/private/macro.rkt
View File

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