summaryrefslogtreecommitdiffstats
path: root/generic/tclPanic.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2015-09-22 15:24:11 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2015-09-22 15:24:11 (GMT)
commit9b08e4775f43cbdf1db67dbca17819c3ebdf1d37 (patch)
treef3f50ec898e4a58a8832047e598219068a9b304f /generic/tclPanic.c
parente0143819032635ae191c10a37c61837e359db146 (diff)
downloadtcl-9b08e4775f43cbdf1db67dbca17819c3ebdf1d37.zip
tcl-9b08e4775f43cbdf1db67dbca17819c3ebdf1d37.tar.gz
tcl-9b08e4775f43cbdf1db67dbca17819c3ebdf1d37.tar.bz2
Decorate Tcl_Panic and Tcl_PanicVA with the noreturn option, alowing further optimizations by the C-compiler.
Diffstat (limited to 'generic/tclPanic.c')
-rw-r--r--generic/tclPanic.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclPanic.c b/generic/tclPanic.c
index 851695f..b032449 100644
--- a/generic/tclPanic.c
+++ b/generic/tclPanic.c
@@ -15,7 +15,7 @@
#include "tclInt.h"
#if defined(_WIN32) || defined(__CYGWIN__)
- MODULE_SCOPE void tclWinDebugPanic(const char *format, ...);
+ MODULE_SCOPE TCL_NORETURN void tclWinDebugPanic(const char *format, ...);
#endif
/*
@@ -24,9 +24,9 @@
*/
#if defined(__CYGWIN__)
-static Tcl_PanicProc *panicProc = tclWinDebugPanic;
+static TCL_NORETURN Tcl_PanicProc *panicProc = tclWinDebugPanic;
#else
-static Tcl_PanicProc *panicProc = NULL;
+static TCL_NORETURN1 Tcl_PanicProc *panicProc = NULL;
#endif
/*
@@ -47,7 +47,7 @@ static Tcl_PanicProc *panicProc = NULL;
void
Tcl_SetPanicProc(
- Tcl_PanicProc *proc)
+ TCL_NORETURN1 Tcl_PanicProc *proc)
{
#if defined(_WIN32)
/* tclWinDebugPanic only installs if there is no panicProc yet. */