Changeset 11889


Ignore:
Timestamp:
Apr 4, 2009, 9:33:48 AM (11 years ago)
Author:
gb
Message:

In handle_exception: if we get a SIGNAL_FOR_INTN trap and don't
have an 'int n' instruction, fall through. If in lisp when the
exception occurred, callback as in handle_fault(), but set the
"write_p" code to (natural)-1 to indicate that we don't know
the fault address or much of anything more about the fault.
(We don't.)

File:
1 edited

Legend:

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

    r11864 r11889  
    10931093
    10941094    } else {
    1095       return handle_fault(tcr, context, info, old_valence);
     1095      if (old_valence == TCR_STATE_LISP) {
     1096        LispObj cmain = nrs_CMAIN.vcell,
     1097          xcf;
     1098        if ((fulltag_of(cmain) == fulltag_misc) &&
     1099            (header_subtag(header_of(cmain)) == subtag_macptr)) {
     1100          xcf = create_exception_callback_frame(context, tcr);
     1101          callback_to_lisp(tcr, cmain, context, xcf, SIGBUS, (natural)-1,0, 0);
     1102        }
     1103      }
     1104      return false;
    10961105    }
    10971106    break;
Note: See TracChangeset for help on using the changeset viewer.