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

Allow for contracts without having to require scheme/contract in the

Browse Source 
scheme/signature language.

svn: r17185
This commit is contained in:
Stevie Strickland 2009-12-04 21:07:13 +00:00
parent a9b6f0e575
commit d97e18c9a6
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/scheme/signature/lang.ss
View File

@ -1,6 +1,7 @@
#lang scheme/base #lang scheme/base
(require scheme/unit (require scheme/unit
scheme/contract
(for-syntax scheme/base (for-syntax scheme/base
mzlib/private/unit-compiletime mzlib/private/unit-compiletime
mzlib/private/unit-syntax)) mzlib/private/unit-syntax))
@ -8,6 +9,7 @@
(provide (rename-out [module-begin #%module-begin]) (provide (rename-out [module-begin #%module-begin])
(except-out (all-from-out scheme/base) #%module-begin) (except-out (all-from-out scheme/base) #%module-begin)
(all-from-out scheme/unit) (all-from-out scheme/unit)
(all-from-out scheme/contract)
(for-syntax (all-from-out scheme/base))) (for-syntax (all-from-out scheme/base)))
(define-for-syntax (make-name s) (define-for-syntax (make-name s)