8 lines
299 B
Scheme
8 lines
299 B
Scheme
(module contract mzscheme
|
|
(require "private/contract.ss")
|
|
(provide (all-from-except "private/contract.ss"
|
|
make-contract
|
|
contract-proc
|
|
raise-contract-error
|
|
build-compound-type-name)))
|