From 09ffb7049288731040aa33c41b5c13952d9ab285 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 10 Dec 2010 16:58:42 -0500 Subject: [PATCH] Update TR tests to reflect new contract error messages. --- collects/tests/typed-scheme/fail/back-and-forth.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/back-and-forth.rkt b/collects/tests/typed-scheme/fail/back-and-forth.rkt index eac8be7dbc..cde56481a2 100644 --- a/collects/tests/typed-scheme/fail/back-and-forth.rkt +++ b/collects/tests/typed-scheme/fail/back-and-forth.rkt @@ -1,5 +1,5 @@ #; -(exn-pred exn:fail:contract? #rx".*violator.*contract.*\\(-> Number Number\\).*f.*") +(exn-pred exn:fail:contract? #rx".*contradiction.*contract.*\\(-> Number Number\\).*f.*") #lang scheme/load diff --git a/collects/tests/typed-scheme/fail/pr10594.rkt b/collects/tests/typed-scheme/fail/pr10594.rkt index 41eb850176..c411152fcb 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".*U broke the contract.*") +(exn-pred exn:fail:contract? #rx".*contradiction.*implementation of 'U.*") #lang scheme/load (module T typed-scheme