suzanne.soy/compatibility
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

update the mzlib contract test suite to the new error messages

Browse Source 
original commit: 94ebb1f31745b9969774e37753e77137223029fc
This commit is contained in:
Robby Findler 2010-12-10 06:51:34 -06:00
commit 2794f54cab
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/tests/racket/contract-mzlib-test.rktl
View File

@ -79,7 +79,7 @@ of the contract library does not change over time.
(let () (let ()
(define (has-proper-blame? msg) (define (has-proper-blame? msg)
(regexp-match? (regexp-match?
(string-append "(^| )" (regexp-quote blame) " broke") (string-append "the implementation of " (regexp-quote blame))
msg)) msg))
(printf "testing: ~s\n" name) (printf "testing: ~s\n" name)
(contract-eval (contract-eval