diff --git a/code/signal.lisp b/code/signal.lisp index ad1003a5103ded5dd06e5dfa3459cd031cac3b64..c55ae362f271ebcb2b1a2da5617057d1436b447d 100644 --- a/code/signal.lisp +++ b/code/signal.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman (FAHLMAN@CMUC). ;;; ********************************************************************** ;;; -;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/signal.lisp,v 1.5 1990/09/09 20:36:24 wlott Exp $ +;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/signal.lisp,v 1.6 1990/10/13 04:54:33 wlott Exp $ ;;; ;;; Code for handling UNIX signals. ;;; @@ -249,7 +249,7 @@ (enable-interrupt :sigtrap #'kernel::internal-error) (enable-interrupt :sigiot #'sigiot-handler) (enable-interrupt :sigemt #'sigemt-handler) - #+nil (enable-interrupt :sigfpe #'sigfpe-handler) + (enable-interrupt :sigfpe #'sigfpe-handler) (enable-interrupt :sigbus #'sigbus-handler) (enable-interrupt :sigsegv #'sigsegv-handler) (enable-interrupt :sigsys #'sigsys-handler)