Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
cmucl
cmucl
Commits
810c52ea
Commit
810c52ea
authored
Oct 07, 2018
by
Raymond Toy
Browse files
Define control_stack_end for all platforms
parent
08a948e1
Pipeline
#389
passed with stage
in 17 minutes and 21 seconds
Changes
3
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
src/lisp/globals.c
View file @
810c52ea
...
...
@@ -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
;
...
...
src/lisp/globals.h
View file @
810c52ea
...
...
@@ -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)
...
...
src/lisp/validate.c
View file @
810c52ea
...
...
@@ -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 */
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment