-q implies modules are loaded

This commit is contained in:
Alex Shinn 2012-06-28 00:42:44 -07:00
parent 88b84d5232
commit 6bcfd141be

1
main.c
View file

@ -367,6 +367,7 @@ void run_main (int argc, char **argv) {
break; break;
case 'q': case 'q':
init_context(); init_context();
mods_loaded = 1;
if (! init_loaded++) if (! init_loaded++)
sexp_load_standard_ports(ctx, env, stdin, stdout, stderr, 0); sexp_load_standard_ports(ctx, env, stdin, stdout, stderr, 0);
break; break;