Skip to content

Commit

Permalink
0.9.5.75:
Browse files Browse the repository at this point in the history
  * %halt on SIGABRT
  • Loading branch information
Gabor Melis committed Oct 17, 2005
1 parent 817aab3 commit 1660211
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 2 deletions.
6 changes: 5 additions & 1 deletion src/code/target-signal.lisp
Expand Up @@ -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")
Expand All @@ -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."
Expand Down
2 changes: 1 addition & 1 deletion version.lisp-expr
Expand Up @@ -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"

0 comments on commit 1660211

Please sign in to comment.