Fixing env initialization for -m. Needed for -mchibi.repl -e'(repl)' to

use the default (scheme base) language.
This commit is contained in:
Alex Shinn 2013-09-30 12:04:59 +09:00
parent 216bfb87c9
commit 82752174c2

2
main.c
View file

@ -366,7 +366,7 @@ void run_main (int argc, char **argv) {
goto load_primitive;
if (c != 'x') {prefix = sexp_import_prefix; suffix = sexp_import_suffix;}
mods_loaded = 1;
load_init(1);
load_init(c == 'x');
#if SEXP_USE_MODULES
check_nonull_arg(c, arg);
len = strlen(arg)+strlen(prefix)+strlen(suffix);