Refactoring scheme/private/contract into reasonably sized pieces.

svn: r16049

original commit: 70e8f21ba2949a2e0762fe7094b115ac6826045f
This commit is contained in:
Stevie Strickland 2009-09-17 19:45:56 +00:00
parent 9ffe007e2e
commit afaa2a2069

View File

@ -29,10 +29,9 @@
;; except the arrow contracts
;;
(require (except-in scheme/private/contract-base
define/contract
with-contract
define-struct/contract)
(require scheme/private/contract-base
scheme/private/contract-misc
scheme/private/contract-provide
scheme/private/contract-guts
scheme/private/contract-ds
scheme/private/contract-opt
@ -43,7 +42,9 @@
(except-out (all-from-out scheme/private/contract-ds)
lazy-depth-to-look)
(except-out (all-from-out scheme/private/contract-base)
(all-from-out scheme/private/contract-base)
(all-from-out scheme/private/contract-provide)
(except-out (all-from-out scheme/private/contract-misc)
check-between/c
string-len/c
check-unary-between/c)