Skip to content
Snippets Groups Projects
Commit 27de7692 authored by wlott's avatar wlott
Browse files

Under SunOS, use the real C stack instead of mapping our own so that it

stays demand paged.
parent cffe95a1
No related branches found
No related tags found
No related merge requests found
......@@ -15,5 +15,9 @@
#define BINDING_STACK_START (0x00f00000)
#define BINDING_STACK_SIZE (0x00080000)
#ifdef SUNOS
#define NUMBER_STACK_START (0xf7ef0000)
#else
#define NUMBER_STACK_START (0xf0000000)
#endif
#define NUMBER_STACK_SIZE (0x00100000)
/*
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/validate.c,v 1.1 1992/07/28 20:15:36 wlott Exp $
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/validate.c,v 1.2 1992/09/08 23:22:52 wlott Exp $
*
* Memory Validation
*/
......@@ -55,7 +55,9 @@ void validate(void)
ensure_space(binding_stack, BINDING_STACK_SIZE);
/* Number stack */
#ifndef SUNOS
ensure_space((lispobj *)NUMBER_STACK_START, NUMBER_STACK_SIZE);
#endif
#ifdef PRINTNOISE
printf(" done.\n");
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment