Index: /trunk/ccl/lisp-kernel/pmcl-kernel.c
===================================================================
--- /trunk/ccl/lisp-kernel/pmcl-kernel.c	(revision 5003)
+++ /trunk/ccl/lisp-kernel/pmcl-kernel.c	(revision 5004)
@@ -530,5 +530,5 @@
 
 #ifdef DARWIN
-#ifdef PPC64
+#if WORD_SIZE == 64
 #define vm_region vm_region_64
 #endif
@@ -545,10 +545,10 @@
   vm_address_t vm_addr = (vm_address_t)addr;
   vm_size_t vm_size;
-#ifdef PPC64
+#if WORD_SIZE == 64
   vm_region_basic_info_data_64_t vm_info;
 #else
   vm_region_basic_info_data_t vm_info;
 #endif
-#ifdef PPC64
+#if WORD_SIZE == 64
   mach_msg_type_number_t vm_info_size = VM_REGION_BASIC_INFO_COUNT_64;
 #else
@@ -561,5 +561,5 @@
 		   &vm_addr,
 		   &vm_size,
-#ifdef PPC64
+#if WORD_SIZE == 64
                    VM_REGION_BASIC_INFO_64,
 #else
@@ -1260,4 +1260,8 @@
                 0),
     old = &spjump_start;
+  if (new == (pc)-1) {
+    perror("remap spjump");
+    exit(1);
+  }
   bcopy(old, new, 0x1000);
 }
@@ -1550,5 +1554,7 @@
     return;
   }
+#ifndef X86
   flush_cache_lines(base, (end-base)/cache_block_size, cache_block_size);
+#endif
 }