Ignore:
Timestamp:
Jul 21, 2007, 9:56:31 PM (12 years ago)
Author:
gb
Message:

Clear and restore the tcr foreign exception bit on interrupt.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/lisp-kernel/x86-exceptions.c

    r6557 r6908  
    11831183          *p,
    11841184          q;
     1185        natural old_foreign_exception = tcr->flags & (1 << TCR_FLAG_BIT_FOREIGN_EXCEPTION);
     1186
     1187        tcr->flags &= ~(1 << TCR_FLAG_BIT_FOREIGN_EXCEPTION);
    11851188           
    11861189        if (next_tsp != save_tsp) {
     
    12061209          *next_tsp = q;
    12071210        }
     1211        tcr->flags |= old_foreign_exception;
    12081212        unlock_exception_lock_in_handler(tcr);
    12091213        exit_signal_handler(tcr, old_valence);
Note: See TracChangeset for help on using the changeset viewer.