Commit 810c52ea authored by Raymond Toy's avatar Raymond Toy

Define control_stack_end for all platforms

parent 08a948e1
Pipeline #389 passed with stage
in 17 minutes and 21 seconds
......@@ -27,10 +27,7 @@ lispobj *dynamic_0_space;
lispobj *dynamic_1_space;
unsigned dynamic_space_size;
lispobj *control_stack;
#if (defined(i386) || defined(__x86_64))
lispobj *control_stack_end;
#endif
lispobj *binding_stack;
lispobj *current_dynamic_space;
......
......@@ -37,9 +37,7 @@ extern unsigned long binding_stack_size;
extern unsigned long static_space_size;
extern unsigned long control_stack_size;
#if (defined(i386) || defined(__x86_64))
extern lispobj *control_stack_end;
#endif
extern lispobj *current_dynamic_space;
#if !defined(ibmrt) && !defined(i386)
......
......@@ -118,17 +118,12 @@ validate_stacks()
#ifdef CONTROL_STACK_START
/* Map the control stack at a fixed location */
control_stack = (lispobj *) CONTROL_STACK_START;
#if (defined(i386) || defined(__x86_64))
control_stack_end = (lispobj *) (CONTROL_STACK_START + control_stack_size);
#endif
ensure_space(control_stack, control_stack_size);
#else
/* Map the conrol stack wherever we have space */
control_stack = (lispobj*) os_validate(NULL, control_stack_size);
#if (defined(i386) || defined(__x86_64))
control_stack_end = (void*)control_stack + control_stack_size;
#endif
#endif
/* Binding Stack */
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment