svn: r15854

This commit is contained in:
Robby Findler 2009-09-01 21:43:41 +00:00
parent 2acdfd6eb5
commit 4532602b5a

View File

@ -655,7 +655,6 @@ improve method arity mismatch contract violation error messages?
[id
(identifier? #'id)
#'id])])
;(printf "id ~s ~s\n" #'id-ref (syntax->datum #'id-ref))
(syntax-local-introduce
(syntax-local-lift-expression
#`(-contract contract-id