freeze mzlib/contract exports from racket/contract/combinator
as they were in 5.3.5 original commit: b93cd5288b800476387c2571c7ba182839b9dbb4
This commit is contained in:
parent
970f0e381a
commit
666b3e3c31
|
@ -191,4 +191,19 @@
|
|||
(provide build-flat-contract)
|
||||
|
||||
(require racket/contract/combinator)
|
||||
(provide (all-from-out racket/contract/combinator))
|
||||
;; exports from racket/contract/combinator as of 5.3.5
|
||||
(provide blame-add-unknown-context blame-context blame-contract blame-fmt->-string blame-negative
|
||||
blame-original? blame-positive blame-replace-negative blame-source blame-swap blame-swapped?
|
||||
blame-update blame-value blame? build-chaperone-contract-property build-compound-type-name
|
||||
build-contract-property build-flat-contract-property chaperone-contract-property?
|
||||
coerce-chaperone-contract coerce-chaperone-contracts coerce-contract coerce-contract/f
|
||||
coerce-contracts coerce-flat-contract coerce-flat-contracts contract-first-order
|
||||
contract-first-order-passes? contract-property? contract-stronger? contract-struct-exercise
|
||||
contract-struct-generate current-blame-format eq-contract-val eq-contract? equal-contract-val
|
||||
equal-contract? exn:fail:contract:blame-object exn:fail:contract:blame?
|
||||
flat-contract-property? impersonator-prop:contracted make-chaperone-contract make-contract
|
||||
make-exn:fail:contract:blame make-flat-contract prop:chaperone-contract prop:contract
|
||||
prop:contracted prop:flat-contract prop:opt-chaperone-contract
|
||||
prop:opt-chaperone-contract-get-test prop:opt-chaperone-contract? raise-blame-error
|
||||
skip-projection-wrapper? struct:exn:fail:contract:blame define/final-prop
|
||||
exn:fail:contract:blame blame-add-context define/subexpression-pos-prop)
|
||||
|
|
Loading…
Reference in New Issue
Block a user