From adeef671cd12826b5e565c47b600e313b9565bb8 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Thu, 14 Jul 2011 16:03:31 -0400 Subject: [PATCH] Fix TR tests to use the new contract error message format. If 7b9b3c371b10 is included in the release, this should be too. --- collects/tests/typed-scheme/fail/cnt-err1.rkt | 2 +- collects/tests/typed-scheme/fail/pr10594.rkt | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/collects/tests/typed-scheme/fail/cnt-err1.rkt b/collects/tests/typed-scheme/fail/cnt-err1.rkt index 71bf76eda9..b0af07e7dc 100644 --- a/collects/tests/typed-scheme/fail/cnt-err1.rkt +++ b/collects/tests/typed-scheme/fail/cnt-err1.rkt @@ -1,5 +1,5 @@ #; -(exn-pred exn:fail:contract? ".*expected .*") +(exn-pred exn:fail:contract? ".*expected: T.*" #rx".*contract.*\\(->.*") #lang scheme/load diff --git a/collects/tests/typed-scheme/fail/pr10594.rkt b/collects/tests/typed-scheme/fail/pr10594.rkt index 89f6eb5a6f..c0cffc7a73 100644 --- a/collects/tests/typed-scheme/fail/pr10594.rkt +++ b/collects/tests/typed-scheme/fail/pr10594.rkt @@ -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 (module T typed-scheme