Skip to content
Snippets Groups Projects
Commit 34d0aace authored by toy's avatar toy
Browse files

Define globals to hold the sizes of the read-only space, the binding stack,

the static space and the control stack so we can print them out with ROOM.
parent 495770f3
No related branches found
No related tags found
No related merge requests found
/*
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/validate.c,v 1.16 2003/10/13 17:04:50 toy Exp $
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/validate.c,v 1.17 2004/01/09 04:36:39 toy Exp $
*
* Memory Validation
*/
......@@ -15,6 +15,11 @@
#include "validate.h"
#include "internals.h"
unsigned long read_only_space_size = READ_ONLY_SPACE_SIZE;
unsigned long binding_stack_size = BINDING_STACK_SIZE;
unsigned long static_space_size = STATIC_SPACE_SIZE;
unsigned long control_stack_size = CONTROL_STACK_SIZE;
static void
ensure_space(lispobj *start, size_t size)
{
......
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