Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-04 11:46:37 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source 
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
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
main.c
View file

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