diff --git a/src/c/nucl.c b/src/c/nucl.c index b69856d0c..541573ba1 100644 --- a/src/c/nucl.c +++ b/src/c/nucl.c @@ -1214,6 +1214,13 @@ void nucl_repl (void) int main() { cl_env_ptr the_env = ecl_core.first_env; + ecl_set_option(ECL_OPT_BIND_STACK_SIZE, 32); + ecl_set_option(ECL_OPT_BIND_STACK_SAFETY_AREA, 8); + ecl_set_option(ECL_OPT_FRAME_STACK_SIZE, 32); + ecl_set_option(ECL_OPT_FRAME_STACK_SAFETY_AREA, 8); + ecl_set_option(ECL_OPT_LISP_STACK_SIZE, 32); + ecl_set_option(ECL_OPT_LISP_STACK_SAFETY_AREA, 8); + ecl_boot(); ecl_add_module(ecl_module_process); ecl_add_module(ecl_module_stacks);