From: Gabor Melis <mega@hotpop.com>
Date: Mon, 17 Oct 2005 09:18:46 +0000 (+0000)
Subject: 0.9.5.75:
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=1660211c38f0e21cf31d1fb964618786fffe17f3;p=sbcl.git

0.9.5.75:
  * %halt on SIGABRT
---

diff --git a/src/code/target-signal.lisp b/src/code/target-signal.lisp
index 524233b..53fc396 100644
--- a/src/code/target-signal.lisp
+++ b/src/code/target-signal.lisp
@@ -119,7 +119,6 @@
 (define-signal-handler sigint-handler "interrupted" sigint-%break)
 (define-signal-handler sigill-handler "illegal instruction")
 (define-signal-handler sigtrap-handler "breakpoint/trap")
-(define-signal-handler sigiot-handler "SIGIOT")
 #!-linux
 (define-signal-handler sigemt-handler "SIGEMT")
 (define-signal-handler sigbus-handler "bus error")
@@ -138,6 +137,11 @@
   (sb!thread::terminate-session)
   (sb!ext:quit))
 
+;; Also known as SIGABRT.
+(defun sigiot-handler (signal code context)
+  (declare (ignore signal code context))
+  (sb!impl::%halt))
+
 (defun sb!kernel:signal-cold-init-or-reinit ()
   #!+sb-doc
   "Enable all the default signals that Lisp knows how to deal with."
diff --git a/version.lisp-expr b/version.lisp-expr
index e0941d0..594bffd 100644
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.9.5.74"
+"0.9.5.75"