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

system-type: fix 'so-mode

Browse Source
This commit is contained in:
Matthew Flatt 2013-03-30 14:13:02 -06:00
parent a1dccb4aa8
commit 9efb14e434
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/racket/src/string.c
View File

@ -2362,7 +2362,7 @@ static Scheme_Object *system_type(int argc, Scheme_Object *argv[])
} }
if (SAME_OBJ(argv[0], so_mode_symbol)) { if (SAME_OBJ(argv[0], so_mode_symbol)) {
#ifdef MZ_DLOPEN_GLOBAL_BY_DEFAULT #ifdef USE_DLOPEN_GLOBAL_BY_DEFAULT
return scheme_intern_symbol("global"); return scheme_intern_symbol("global");
#else #else
return scheme_intern_symbol("local"); return scheme_intern_symbol("local");