From 1bdaf0b231c32ae0c404413bcc8dc5bfcabbbe11 Mon Sep 17 00:00:00 2001 From: Daniel Feltey Date: Wed, 17 May 2017 10:51:45 -0500 Subject: [PATCH] Fix typo for chaperone-vector* error messages --- racket/src/racket/src/vector.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/racket/src/racket/src/vector.c b/racket/src/racket/src/vector.c index 97a6e1a66d..30d198349b 100644 --- a/racket/src/racket/src/vector.c +++ b/racket/src/racket/src/vector.c @@ -1001,7 +1001,7 @@ static Scheme_Object *chaperone_vector(int argc, Scheme_Object **argv) static Scheme_Object *chaperone_vector_star(int argc, Scheme_Object **argv) { - return do_chaperone_vector("chaperone-vector", 0, 1, 0, argc, argv); + return do_chaperone_vector("chaperone-vector*", 0, 1, 0, argc, argv); } static Scheme_Object *impersonate_vector(int argc, Scheme_Object **argv) @@ -1011,7 +1011,7 @@ static Scheme_Object *impersonate_vector(int argc, Scheme_Object **argv) static Scheme_Object *impersonate_vector_star(int argc, Scheme_Object **argv) { - return do_chaperone_vector("impersonate-vector", 1, 1, 0, argc, argv); + return do_chaperone_vector("impersonate-vector*", 1, 1, 0, argc, argv); } static Scheme_Object *unsafe_chaperone_vector(int argc, Scheme_Object **argv)