Changeset 13767

Timestamp:

Jun 1, 2010, 10:45:17 AM (14 years ago)

Author:

R. Matthew Emerson

Message:

When we find that we've take an exception in some foreign context,
call lisp_Debugger() directly so that we can pass in the siginfo_t
structure.

File:

• trunk/source/lisp-kernel/x86-exceptions.c (modified) (2 diffs)

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

@@ -1551 +1551 @@
 #if 1
   if (tcr->valence != TCR_STATE_LISP) {
-    FBug(context, "exception in foreign context");
+    lisp_Debugger(context, info, signum, true, "exception in foreign context");
   }
 #endif
@@ -1585 +1585 @@
 #if 1
   if (tcr->valence != TCR_STATE_LISP) {
-    FBug(context, "exception in foreign context");
+    lisp_Debugger(context, info, signum, true, "exception in foreign context");
   }
 #endif