1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
|
Index: src/runtime/bsd-os.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/bsd-os.c,v
retrieving revision 1.29
diff -u -r1.29 bsd-os.c
--- src/runtime/bsd-os.c 4 Dec 2005 22:25:07 -0000 1.29
+++ src/runtime/bsd-os.c 28 Dec 2005 01:24:17 -0000
@@ -204,6 +204,10 @@
SHOW("os_install_interrupt_handlers()/bsd-os/defined(GENCGC)");
undoably_install_low_level_interrupt_handler(SIG_MEMORY_FAULT,
memory_fault_handler);
+#ifdef SIG_MEMORY_FAULT2
+ undoably_install_low_level_interrupt_handler(SIG_MEMORY_FAULT2,
+ memory_fault_handler);
+#endif
SHOW("leaving os_install_interrupt_handlers()");
}
@@ -230,6 +234,10 @@
SHOW("os_install_interrupt_handlers()/bsd-os/!defined(GENCGC)");
undoably_install_low_level_interrupt_handler(SIG_MEMORY_FAULT,
sigsegv_handler);
+#ifdef SIG_MEMORY_FAULT2
+ undoably_install_low_level_interrupt_handler(SIG_MEMORY_FAULT2,
+ sigsegv_handler);
+#endif
}
#endif /* defined GENCGC */
Index: src/runtime/bsd-os.h
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/bsd-os.h,v
retrieving revision 1.14
diff -u -r1.14 bsd-os.h
--- src/runtime/bsd-os.h 17 Apr 2005 19:41:28 -0000 1.14
+++ src/runtime/bsd-os.h 28 Dec 2005 01:24:17 -0000
@@ -55,6 +55,7 @@
* so we need to implement single stepping in a more roundabout way. */
#define CANNOT_GET_TO_SINGLE_STEP_FLAG
#define SIG_MEMORY_FAULT SIGBUS
+#define SIG_MEMORY_FAULT2 SIGSEGV
#elif defined __OpenBSD__
Index: src/runtime/interrupt.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/interrupt.c,v
retrieving revision 1.106
diff -u -r1.106 interrupt.c
--- src/runtime/interrupt.c 4 Dec 2005 22:25:07 -0000 1.106
+++ src/runtime/interrupt.c 28 Dec 2005 01:24:17 -0000
@@ -1140,6 +1140,9 @@
(sigaction_nodefer_works ? SA_NODEFER : 0);
#ifdef LISP_FEATURE_C_STACK_IS_CONTROL_STACK
if((signal==SIG_MEMORY_FAULT)
+#ifdef SIG_MEMORY_FAULT2
+ || (signal==SIG_MEMORY_FAULT2)
+#endif
#ifdef SIG_INTERRUPT_THREAD
|| (signal==SIG_INTERRUPT_THREAD)
#endif
|
