Fix test for new contract error message format.

This commit is contained in:
Vincent St-Amour 2011-07-11 15:35:49 -04:00
parent 09b6616bfa
commit 79ef8e889e

View File

@ -1,5 +1,5 @@
#; #;
(exn-pred exn:fail:contract? #rx".*contract violation.*blaming 'U.*") (exn-pred exn:fail:contract? #rx".*contract violation.*blaming U.*")
#lang scheme/load #lang scheme/load
(module T typed-scheme (module T typed-scheme