Changeset 5962

Timestamp:

Feb 28, 2007, 4:16:41 AM (18 years ago)

Author:

Gary Byers

Message:

In pc_luser_xp: if allocating and before the alloc trap and interrupting,
back out of the modification to save_allocptr (and allocptr register)
and set *interrupt_displacement.

File:

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

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

@@ -1552 +1552 @@
       /* Fall through */
     case ID_load_allocptr_reg_from_tcr_save_allocptr_instruction:
-      tcr->save_allocptr = (void *)(VOID_ALLOCPTR-disp);
+      if (interrupt_displacement) {
+        tcr->save_allocptr += disp;
+        *interrupt_displacement = disp;
+      } else {
+        tcr->save_allocptr = (void *)(VOID_ALLOCPTR-disp);
+      }
       break;
     }