X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fcoreparse.c;h=f314449c5b521e8ee0d54c8cec2fae15bb28a5e4;hb=a1a2c079c7654defb618baad0dddcf0eaf2ce64f;hp=a016ced85347c9f7078c3d1f4308011eafdc4640;hpb=a4e7c6bc705d739360dfaa9c3c652fd4a05d6c06;p=sbcl.git

diff --git a/src/runtime/coreparse.c b/src/runtime/coreparse.c
index a016ced..f314449 100644
--- a/src/runtime/coreparse.c
+++ b/src/runtime/coreparse.c
@@ -69,7 +69,7 @@ process_directory(int fd, long *ptr, int count)
 	    if (addr != (os_vm_address_t)DYNAMIC_SPACE_START) {
 	        fprintf(stderr, "in core: 0x%x - in runtime: 0x%x \n",
 			addr, (os_vm_address_t)DYNAMIC_SPACE_START);
-		fprintf(stderr,"warning: core/runtime address mismatch: DYNAMIC_SPACE_START");
+		lose("core/runtime address mismatch: DYNAMIC_SPACE_START");
 	    }
 #else
 	    if ((addr != (os_vm_address_t)DYNAMIC_0_SPACE_START) &&
@@ -77,13 +77,13 @@ process_directory(int fd, long *ptr, int count)
 		fprintf(stderr, "in core: 0x%x - in runtime: 0x%x or 0x%x\n",
 			addr, (os_vm_address_t)DYNAMIC_0_SPACE_START,
 			(os_vm_address_t)DYNAMIC_1_SPACE_START);
-		fprintf(stderr,"warning: core/runtime address mismatch: DYNAMIC_SPACE_START");
+		lose("warning: core/runtime address mismatch: DYNAMIC_SPACE_START");
 	    }
 #endif
 /* FIXME: Should the conditional here be reg_ALLOC instead of
- *   defined(ibmrt) || defined(__i386__)
+ *   defined(__i386__)
  * ? */
-#if defined(ibmrt) || defined(__i386__)
+#if defined(__i386__)
 	    SetSymbolValue(ALLOCATION_POINTER, (lispobj)free_pointer);
 #else
 	    dynamic_space_free_pointer = free_pointer;