Merge pull request #1696 from dfeltey/chaperone-vector-start-typo

Fix typo for chaperone-vector* error messages
This commit is contained in:
Dan Feltey 2017-05-17 15:15:36 -05:00 committed by GitHub
commit 544b7a2721

View File

@ -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)