diff options
author | dkf <dkf@noemail.net> | 2009-10-21 13:53:14 (GMT) |
---|---|---|
committer | dkf <dkf@noemail.net> | 2009-10-21 13:53:14 (GMT) |
commit | 21e7d2294a4e0def40a6a386bba8d13147261939 (patch) | |
tree | 59c985aa55b81cff86c9908fea48512f19c7a7ff /generic | |
parent | e5affcf344313d53200177e8395e9c6f1d0a746d (diff) | |
download | tcl-21e7d2294a4e0def40a6a386bba8d13147261939.zip tcl-21e7d2294a4e0def40a6a386bba8d13147261939.tar.gz tcl-21e7d2294a4e0def40a6a386bba8d13147261939.tar.bz2 |
Fix [Bug 2882561].
FossilOrigin-Name: 2f58fcf25ac182ccbb5ce72fbb013a4337fe9ff8
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclPosixStr.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclPosixStr.c b/generic/tclPosixStr.c index 5c1a1b9..4d7c559 100644 --- a/generic/tclPosixStr.c +++ b/generic/tclPosixStr.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclPosixStr.c,v 1.15 2009/03/15 15:35:46 dkf Exp $ + * RCS: @(#) $Id: tclPosixStr.c,v 1.16 2009/10/21 13:53:14 dkf Exp $ */ #include "tclInt.h" @@ -994,7 +994,7 @@ Tcl_SignalId( #ifdef SIGQUIT case SIGQUIT: return "SIGQUIT"; #endif -#ifdef SIGSEGV +#if defined(SIGSEGV) && (!defined(SIGBUS) || (SIGSEGV != SIGBUS)) case SIGSEGV: return "SIGSEGV"; #endif #ifdef SIGSTOP @@ -1128,7 +1128,7 @@ Tcl_SignalMsg( #ifdef SIGQUIT case SIGQUIT: return "quit signal"; #endif -#ifdef SIGSEGV +#if defined(SIGSEGV) && (!defined(SIGBUS) || (SIGSEGV != SIGBUS)) case SIGSEGV: return "segmentation violation"; #endif #ifdef SIGSTOP |