svn: r2880
This commit is contained in:
Matthias Felleisen 2006-05-09 15:59:00 +00:00
parent d016a78166
commit 4748ea4490

View File

@ -8,7 +8,7 @@
)
;; (define-as-contract string (id x ...) body ...)
;; introduces Id for export as a contract and
;; introduces id for export as a contract and
;; is-id? for local testing as a function
(define-syntax (define-as-contract stx)
(syntax-case stx ()