fix mprotect CPP for when mprotect isn't needed

svn: r11971

src/mzscheme/src/hash.c

@@ -55,8 +55,10 @@ long PTR_TO_LONG(Scheme_Object *o)
 #ifdef OBJHEAD_HAS_HASH_BITS
     /* In 3m mode, we only have 14 bits of hash code in the
        Scheme_Object header. But the GC-level object header has some
-       leftover bits (currently 9 or 41, depending on the platform),
-       so use those, too. */
+       leftover bits (currently 9, 11, 41, or 43, depending on the
+       platform), so use those, too. That only works for GCable
+       objects, so we use 1 of our 14 bits to indicate whether the
+       other bit are present. */
     if (GC_is_allocated(o)) {
       OBJHEAD_HASH_BITS(o) = (keygen >> 16);
       v |= 0x4000;

src/mzscheme/src/salloc.c

@@ -658,7 +658,6 @@ static void free_page(void *p, long size)
   munmap(p, size);
 #endif
 }
-#endif
 
 static void init_free_list()
 {
@@ -707,6 +706,7 @@ static long free_list_find_bucket(long size)
   else
     return lo;
 }
+#endif
 
 void *scheme_malloc_code(long size)
 {