Move the global safepoint to one page before static space

[sbcl.git] / src / runtime / gencgc-alloc-region.h

diff --git a/src/runtime/gencgc-alloc-region.h b/src/runtime/gencgc-alloc-region.h
index 8e9dbed..f209205 100644 (file)
--- a/src/runtime/gencgc-alloc-region.h
+++ b/src/runtime/gencgc-alloc-region.h
@@ -1,5 +1,12 @@
 #ifndef _GENCGC_ALLOC_REGION_H_
 #define _GENCGC_ALLOC_REGION_H_
+
+#include "gc.h"
+
+#ifndef LISP_FEATURE_GENCGC
+#error "gencgc-alloc-region.h included, but LISP_FEATURE_GENCGC not defined"
+#endif
+
 /* Abstract out the data for an allocation region allowing a single
  * routine to be used for allocation and closing. */
 struct alloc_region {
@@ -9,17 +16,14 @@ struct alloc_region {
     void  *end_addr; /* pointer to the byte after the last usable byte */
 
     /* These are needed when closing the region. */
-    int  first_page;
-    int  last_page;
+    page_index_t  first_page;
+    page_index_t  last_page;
     void  *start_addr;
 };
 
 extern struct alloc_region  boxed_region;
 extern struct alloc_region  unboxed_region;
-extern int from_space, new_space;
+extern generation_index_t from_space, new_space;
 extern struct weak_pointer *weak_pointers;
 
-extern void *current_region_free_pointer;
-extern void *current_region_end_addr;
-
 #endif /*  _GENCGC_ALLOC_REGION_H_ */