X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fvalidate.h;h=bc7ca14f2dc902e38318536922cc19519a885dcb;hb=095564c28a259002c7e34fd1d861f5bbd0a959b6;hp=36c973c534d569a54abe92c525ff35b740564821;hpb=75b52379bdc2269961af6a1308eca63610f38ac3;p=sbcl.git diff --git a/src/runtime/validate.h b/src/runtime/validate.h index 36c973c..bc7ca14 100644 --- a/src/runtime/validate.h +++ b/src/runtime/validate.h @@ -27,13 +27,15 @@ #include #ifdef LISP_FEATURE_STACK_GROWS_DOWNWARD_NOT_UPWARD #define CONTROL_STACK_GUARD_PAGE(th) ((void *)(th->control_stack_start)) +#define CONTROL_STACK_RETURN_GUARD_PAGE(th) (CONTROL_STACK_GUARD_PAGE(th) + os_vm_page_size) #else -#define CONTROL_STACK_GUARD_PAGE(th) \ - (((void *)(th->control_stack_end)) - os_vm_page_size) +#define CONTROL_STACK_GUARD_PAGE(th) (((void *)(th->control_stack_end)) - os_vm_page_size) +#define CONTROL_STACK_RETURN_GUARD_PAGE(th) (CONTROL_STACK_GUARD_PAGE(th) - os_vm_page_size) #endif extern void validate(void); extern void protect_control_stack_guard_page(pid_t t_id, int protect_p); +extern void protect_control_stack_return_guard_page(pid_t t_id, int protect_p); #endif /* note for anyone trying to port an architecture's support files