Changeset 6281

Timestamp:

Apr 16, 2007, 11:15:49 AM (18 years ago)

Author:

Gary Byers

Message:

Memory-fault errors on PPC, too.

File:

• trunk/ccl/lisp-kernel/ppc-exceptions.c (modified) (1 diff)

trunk/ccl/lisp-kernel/ppc-exceptions.c

@@ -894 +894 @@
   }
 
-  if (! is_write_fault(xp, info)) {
-    return -1;
-  }
-
-  area = find_protected_area(addr);
-
-  if (area == NULL) {           /* Don't know why this fault happened. */
-    return -1;
-  }
-  
-  handler = protection_handlers[area->why];
-
-  return handler(xp, area, addr);
+
+  if (is_write_fault(xp,info)) {
+    area = find_protected_area(addr);
+    if (area != NULL) {
+      handler = protection_handlers[area->why];
+      return handler(xp, area, addr);
+    }
+  }
+  callback_for_trap(nrs_CMAIN.vcell, xp, (pc)xpPC(xp), SIGBUS, (natural)addr, is_write_fault(xp,info));
+  return -1;
 }