X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fvalidate.h;h=2a963a05ea1f95e7dc8d9ce0889b1a9b5d3cf714;hb=cd2c70c8b5d4dcc62b968f5a9bedd3c9c8698e82;hp=876d39b0d32c0057b91ea24cd72986486ece22b8;hpb=cea4896b2482b7b2b429c1631d774b4cfbc0efba;p=sbcl.git diff --git a/src/runtime/validate.h b/src/runtime/validate.h index 876d39b..2a963a0 100644 --- a/src/runtime/validate.h +++ b/src/runtime/validate.h @@ -12,30 +12,36 @@ #if !defined(_INCLUDE_VALIDATE_H_) #define _INCLUDE_VALIDATE_H_ -#ifdef parisc -#include "hppa-validate.h" -#endif parisc - -#ifdef mips -#include "mips-validate.h" -#endif - -#ifdef ibmrt -#include "rt-validate.h" +/* constants derived from the fundamental constants in passed by GENESIS */ +#define BINDING_STACK_SIZE ( BINDING_STACK_END - BINDING_STACK_START) +#define CONTROL_STACK_SIZE ( CONTROL_STACK_END - CONTROL_STACK_START) +#define DYNAMIC_SPACE_SIZE ( DYNAMIC_SPACE_END - DYNAMIC_SPACE_START) +#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 -#ifdef sparc -#include "sparc-validate.h" -#endif - -#ifdef __i386__ -#include "x86-validate.h" -#endif - -#ifdef alpha -#include "alpha-validate.h" +#if !defined(LANGUAGE_ASSEMBLY) +extern void validate(void); +extern void protect_control_stack_guard_page(int protect_p); #endif -extern void validate(void); +/* note for anyone trying to port an architecture's support files + * from CMU CL to SBCL: + * + * CMU CL had architecture-dependent header files included here to + * define memory map data: + * #ifdef __i386__ + * #include "x86-validate.h" + * #endif + * and so forth. In SBCL, the memory map data are defined at the Lisp + * level (compiler/target/parms.lisp) and stuffed into the sbcl.h file + * created by GENESIS, so there's no longer a need for an + * architecture-dependent header file of memory map data. + */ #endif