Changeset 8471

Timestamp:

Feb 12, 2008, 3:14:35 AM (17 years ago)

Author:

Gary Byers

Message:

On a write to the (usually write-protected) pure area, just unprotect
the page.

File:

• trunk/source/lisp-kernel/x86-exceptions.c (modified) (1 diff)

trunk/source/lisp-kernel/x86-exceptions.c

@@ -638 +638 @@
       handler = protection_handlers[a->why];
       return handler(xp, a, addr);
+    } else {
+      if ((addr >= readonly_area->low) &&
+          (addr < readonly_area->active)) {
+        UnProtectMemory((LogicalAddress)(truncate_to_power_of_2(addr,log2_page_size)),
+                        page_size);
+        return true;
+      }
     }
   }