From e12e5598780d49eb386bf7fc389ac5e06d3dda35 Mon Sep 17 00:00:00 2001
From: Jay McCarthy <jay@racket-lang.org>
Date: Thu, 17 May 2012 10:08:19 -0600
Subject: [PATCH] Fix breakage from 3fceae27152c06906fec247fcb762c5133e8da13

---
 collects/tests/unstable/temp-c/future-ctc.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/collects/tests/unstable/temp-c/future-ctc.rkt b/collects/tests/unstable/temp-c/future-ctc.rkt
index 7a9ece4a5f..e34d2fa1fd 100644
--- a/collects/tests/unstable/temp-c/future-ctc.rkt
+++ b/collects/tests/unstable/temp-c/future-ctc.rkt
@@ -62,9 +62,9 @@
   (define-values (? o) (strange-fun/ctc (λ (x) x)))
   (test
    (o 4) => 4
-   (o "string") =error> "contract violation"
+   (o "string") =error> "broke"
    
-   (bad-strange-fun/ctc (λ (x) x)) =error> "contract violation"))
+   (bad-strange-fun/ctc (λ (x) x)) =error> "broke"))
 
 (test
  ; ->i doesn't work