Changeset 6264

Timestamp:

Apr 14, 2007, 4:17:37 PM (18 years ago)

Author:

Gary Byers

Message:

raise_pending_interrupt(): unscramble what it means for an interrupt
to be pending on x86-64.

File:

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

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

@@ -873 +873 @@
 raise_pending_interrupt(TCR *tcr)
 {
-  if (TCR_INTERRUPT_LEVEL(tcr) > 0) {
+  if ((TCR_INTERRUPT_LEVEL(tcr) >= 0) &&
+      (tcr->interrupt_pending)) {
     pthread_kill((pthread_t)(tcr->osid), SIGNAL_FOR_PROCESS_INTERRUPT);
   }