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

fix error message for system-type

Browse Source 
svn: r5377
This commit is contained in:
Matthew Flatt 2007-01-17 07:55:07 +00:00
parent 7c153c3248
commit 4c9bb95622
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/mzscheme/src/string.c
View File

@ -2139,7 +2139,7 @@ static Scheme_Object *system_type(int argc, Scheme_Object *argv[])
sym = scheme_intern_symbol("os");
if (!SAME_OBJ(argv[0], sym)) {
scheme_wrong_type("system-type", "'os, 'link, 'machine, or 'gc", 0, argc, argv);
scheme_wrong_type("system-type", "'os, 'link, 'machine, 'gc, or 'so-suffix", 0, argc, argv);
return NULL;
}
}