suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix typo for chaperone-vector* error messages

Browse Source
This commit is contained in:
Daniel Feltey 2017-05-17 10:51:45 -05:00
parent 8bc9cef7a9
commit 1bdaf0b231
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
racket/src/racket/src/vector.c
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) 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) 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) 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) static Scheme_Object *unsafe_chaperone_vector(int argc, Scheme_Object **argv)