From f2236ea54bb3e732c9eb0fe47e6f44c19bbb609a Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Fri, 6 Nov 2015 14:01:10 -0500 Subject: [PATCH] Revert "Fix mzlib contract test for new `or/c` behavior." This reverts commit cafefcf72149bf9741d516ecdbff0afd81190745. --- compatibility-test/tests/mzlib/contract-mzlib-test.rktl | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/compatibility-test/tests/mzlib/contract-mzlib-test.rktl b/compatibility-test/tests/mzlib/contract-mzlib-test.rktl index f5175dd..de4292f 100644 --- a/compatibility-test/tests/mzlib/contract-mzlib-test.rktl +++ b/compatibility-test/tests/mzlib/contract-mzlib-test.rktl @@ -1502,11 +1502,10 @@ of the contract library does not change over time. 1) (contract-error-test - #'((contract (or/c (-> integer? integer?) (-> boolean? boolean?)) - (λ (x) x) - 'pos - 'neg) - #f) + #'(contract (or/c (-> integer? integer?) (-> boolean? boolean?)) + (λ (x) x) + 'pos + 'neg) exn:fail?) (test/spec-passed/result