Revert "Fix mzlib contract test for new or/c
behavior."
This reverts commit cafefcf721
.
This commit is contained in:
parent
ed7f3e639e
commit
f2236ea54b
|
@ -1502,11 +1502,10 @@ of the contract library does not change over time.
|
||||||
1)
|
1)
|
||||||
|
|
||||||
(contract-error-test
|
(contract-error-test
|
||||||
#'((contract (or/c (-> integer? integer?) (-> boolean? boolean?))
|
#'(contract (or/c (-> integer? integer?) (-> boolean? boolean?))
|
||||||
(λ (x) x)
|
(λ (x) x)
|
||||||
'pos
|
'pos
|
||||||
'neg)
|
'neg)
|
||||||
#f)
|
|
||||||
exn:fail?)
|
exn:fail?)
|
||||||
|
|
||||||
(test/spec-passed/result
|
(test/spec-passed/result
|
||||||
|
|
Loading…
Reference in New Issue
Block a user