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