X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fgencgc-alloc-region.h;h=f209205d17ce874de28161f78844e6d9769d0f35;hb=0285aa5ff8416027932daa001b84429be2ca559b;hp=cf03761dbf0701e722cf2dea5e88db006a89297a;hpb=e6c3f1d3e416bd473a9e476e6f95235c783794a3;p=sbcl.git

diff --git a/src/runtime/gencgc-alloc-region.h b/src/runtime/gencgc-alloc-region.h
index cf03761..f209205 100644
--- a/src/runtime/gencgc-alloc-region.h
+++ b/src/runtime/gencgc-alloc-region.h
@@ -3,6 +3,10 @@
 
 #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 {
@@ -12,8 +16,8 @@ struct alloc_region {
     void  *end_addr; /* pointer to the byte after the last usable byte */
 
     /* These are needed when closing the region. */
-    long  first_page;
-    long  last_page;
+    page_index_t  first_page;
+    page_index_t  last_page;
     void  *start_addr;
 };
 
@@ -22,7 +26,4 @@ extern struct alloc_region  unboxed_region;
 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_ */