update mzlib contract test suite to recent changes to racket/contract

This commit is contained in:
Robby Findler 2013-03-24 07:24:08 -05:00
parent 6e4d483403
commit 64849bddd2

View File

@ -4178,7 +4178,7 @@ so that propagation occurs.
(test-name 'printable/c printable/c)
(test-name '(or/c 'a 'b 'c) (symbols 'a 'b 'c))
(test-name '(or/c 1 2 3) (one-of/c 1 2 3))
(test-name '(one-of/c '() 'x 1 #f #\a (void) (letrec ([x x]) x))
(test-name '(or/c '() 'x 1 #f #\a void? undefined?)
(one-of/c '() 'x 1 #f #\a (void) (letrec ([x x]) x)))
(test-name '(subclass?/c c%)