diff --git a/racket/src/racket/src/jitcommon.c b/racket/src/racket/src/jitcommon.c index 41b75b7652..a8af6168fd 100644 --- a/racket/src/racket/src/jitcommon.c +++ b/racket/src/racket/src/jitcommon.c @@ -92,12 +92,8 @@ static void apply_prim_to_fail(int argc, Scheme_Object **argv, void *_p) static Scheme_Object *vector_check_chaperone_of(Scheme_Object *o, Scheme_Object *orig, int setter) { if (!scheme_chaperone_of(o, orig)) - scheme_contract_error((setter ? "vector-set!" : "vector-ref"), - "chaperone produced a result that is not a chaperone of the original result", - "chaperone result", 1, o, - "original result", 1, o, - NULL); - + scheme_wrong_chaperoned((setter ? "vector-set!" : "vector-ref"), "result", orig, o); + return o; }