X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fvalidate.h;h=478f321d2654a2b238fb45433ba0f7bfe6807f23;hb=929fde778f2e5a422f9bcd8ad5f6dcf1dbfccf15;hp=36c973c534d569a54abe92c525ff35b740564821;hpb=75b52379bdc2269961af6a1308eca63610f38ac3;p=sbcl.git diff --git a/src/runtime/validate.h b/src/runtime/validate.h index 36c973c..478f321 100644 --- a/src/runtime/validate.h +++ b/src/runtime/validate.h @@ -27,13 +27,16 @@ #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); +extern os_vm_address_t undefined_alien_address; #endif /* note for anyone trying to port an architecture's support files