From c4bbfad25890a7b397773a8a72e0012259796e1a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= Date: Fri, 6 Jun 2025 12:56:39 +0200 Subject: [PATCH] [nucl] smaller stacks --- src/c/nucl.c | 7 +++++++ 1 file changed, 7 insertions(+) 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);