summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2009-03-15 15:35:46 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2009-03-15 15:35:46 (GMT)
commitf700f9df947178952eab7555ad480c1b37ae6e90 (patch)
treebe981035ffbd7393387e42b3e18ebbbc509ad697
parent1a3d859ba4af2849601d1793b65e3cb5b3141e15 (diff)
downloadtcl-f700f9df947178952eab7555ad480c1b37ae6e90.zip
tcl-f700f9df947178952eab7555ad480c1b37ae6e90.tar.gz
tcl-f700f9df947178952eab7555ad480c1b37ae6e90.tar.bz2
Added support for SIGINFO. [Patch 1513655]
-rw-r--r--ChangeLog5
-rw-r--r--generic/tclPosixStr.c8
2 files changed, 12 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 69ea0b5..03361cd 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2009-03-15 Donal K. Fellows <dkf@users.sf.net>
+
+ * generic/tclPosixStr.c (Tcl_SignalId,Tcl_SignalMsg): [Patch 1513655]:
+ Added support for SIGINFO, which is present on BSD platforms.
+
2009-03-14 Donal K. Fellows <dkf@users.sf.net>
* unix/tcl.pc.in (new file): [Patch 2243948] (hat0)
diff --git a/generic/tclPosixStr.c b/generic/tclPosixStr.c
index 376815e..5c1a1b9 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.14 2009/01/09 11:21:46 dkf Exp $
+ * RCS: @(#) $Id: tclPosixStr.c,v 1.15 2009/03/15 15:35:46 dkf Exp $
*/
#include "tclInt.h"
@@ -1039,6 +1039,9 @@ Tcl_SignalId(
#ifdef SIGXFSZ
case SIGXFSZ: return "SIGXFSZ";
#endif
+#if defined(SIGINFO) && (!defined(SIGPWR) || (SIGINFO != SIGPWR))
+ case SIGINFO: return "SIGINFO";
+#endif
}
return "unknown signal";
}
@@ -1170,6 +1173,9 @@ Tcl_SignalMsg(
#ifdef SIGXFSZ
case SIGXFSZ: return "exceeded file size limit";
#endif
+#if defined(SIGINFO) && (!defined(SIGPWR) || (SIGINFO != SIGPWR))
+ case SIGINFO: return "information request";
+#endif
}
return "unknown signal";
}