X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fvalidate.h;h=b0f9122f94eea00dd9dffec5ba684b0d7b6c6c81;hb=3dd90b64c37103d9c86d32b6c36277a6cea4098a;hp=05f58e8c7940d5748872f48909e6c126a51feee5;hpb=0b5119848b6b8713e473fa669356645747e11dbd;p=sbcl.git diff --git a/src/runtime/validate.h b/src/runtime/validate.h index 05f58e8..b0f9122 100644 --- a/src/runtime/validate.h +++ b/src/runtime/validate.h @@ -19,13 +19,13 @@ #define BINDING_STACK_SIZE (1024*1024) /* chosen at random */ /* eventually choosable per-thread: */ -#define THREAD_CONTROL_STACK_SIZE (2*1024*1024) +#define DEFAULT_CONTROL_STACK_SIZE (2*1024*1024) /* constants derived from the fundamental constants in passed by GENESIS */ #ifdef LISP_FEATURE_GENCGC -#define DYNAMIC_SPACE_SIZE (DYNAMIC_SPACE_END - DYNAMIC_SPACE_START) +#define DEFAULT_DYNAMIC_SPACE_SIZE (DYNAMIC_SPACE_END - DYNAMIC_SPACE_START) #else -#define DYNAMIC_SPACE_SIZE (DYNAMIC_0_SPACE_END - DYNAMIC_0_SPACE_START) +#define DEFAULT_DYNAMIC_SPACE_SIZE (DYNAMIC_0_SPACE_END - DYNAMIC_0_SPACE_START) #endif #define READ_ONLY_SPACE_SIZE (READ_ONLY_SPACE_END - READ_ONLY_SPACE_START) #define STATIC_SPACE_SIZE (STATIC_SPACE_END - STATIC_SPACE_START) @@ -51,6 +51,10 @@ extern void validate(void); extern void protect_control_stack_guard_page(int protect_p); extern void protect_control_stack_return_guard_page(int protect_p); +extern void protect_control_stack_guard_page_thread(int protect_p, + struct thread *th); +extern void protect_control_stack_return_guard_page_thread(int protect_p, + struct thread* th); extern os_vm_address_t undefined_alien_address; #endif