Changeset 14603

Timestamp:

Jan 26, 2011, 9:34:44 PM (14 years ago)

Author:

Gary Byers

Message:

define & initialize reserved_region_end.

File:

• trunk/source/lisp-kernel/pmcl-kernel.c (modified) (3 diffs)

trunk/source/lisp-kernel/pmcl-kernel.c

@@ -379 +379 @@
 reserved_area_size = MAXIMUM_MAPPABLE_MEMORY;
 
+BytePtr reserved_region_end = NULL;
+
 area 
   *nilreg_area=NULL,
@@ -571 +573 @@
   */
   end = lastbyte;
+  reserved_region_end = lastbyte;
   end = (BytePtr) ((natural)((((natural)end) - ((totalsize+63)>>6)) & ~4095));
 
@@ -2161 +2164 @@
     err = errno;
   }
+#ifdef DARWIN
+#ifdef X86
+  if (image_nil == 0) {
+    extern LispObj load_native_library(char *);
+    image_nil = load_native_library(path);
+  }
+#endif
+#endif
   if (image_nil == 0) {
 #ifdef WINDOWS