diff --git a/src/c/stacks.d b/src/c/stacks.d index 2c22a4334..9f2c6de58 100644 --- a/src/c/stacks.d +++ b/src/c/stacks.d @@ -486,10 +486,6 @@ si_set_limit(cl_object type, cl_object size) cs_set_size(env, the_size); } else if (type == @'ext::lisp-stack') { ecl_stack_set_size(env, the_size); -#ifdef GBC_BOEHM - } else if (type == @'ext::heap-size') { - si_heap_size(1, size); -#endif } else { _ecl_set_max_heap_size(the_size); } @@ -509,10 +505,6 @@ si_get_limit(cl_object type) output = env->cs_size; } else if (type == @'ext::lisp-stack') { output = env->stack_size; -#ifdef GBC_BOEHM - } else if (type == @'ext::heap-size') { - output = si_heap_size(0); -#endif } else { output = cl_core.max_heap_size; }