X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fvalidate.h;h=2a963a05ea1f95e7dc8d9ce0889b1a9b5d3cf714;hb=cd2c70c8b5d4dcc62b968f5a9bedd3c9c8698e82;hp=9f13e9f56a9e9c34cf11dddb06e542ccdd568fa1;hpb=d7f6139a91d7d9b0667a597584ae306d958bb2f4;p=sbcl.git

diff --git a/src/runtime/validate.h b/src/runtime/validate.h
index 9f13e9f..2a963a0 100644
--- a/src/runtime/validate.h
+++ b/src/runtime/validate.h
@@ -19,8 +19,15 @@
 #define READ_ONLY_SPACE_SIZE (READ_ONLY_SPACE_END - READ_ONLY_SPACE_START)
 #define    STATIC_SPACE_SIZE (   STATIC_SPACE_END -    STATIC_SPACE_START)
 
+#ifdef LISP_FEATURE_STACK_GROWS_DOWNWARD_NOT_UPWARD 
+#define CONTROL_STACK_GUARD_PAGE (CONTROL_STACK_START)
+#else
+#define CONTROL_STACK_GUARD_PAGE (CONTROL_STACK_END - os_vm_page_size)
+#endif
+
 #if !defined(LANGUAGE_ASSEMBLY)
 extern void validate(void);
+extern void protect_control_stack_guard_page(int protect_p);
 #endif
 
 /* note for anyone trying to port an architecture's support files