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)
commitcb1f5ad4901220060bc319970cf3434734b3a1aa (patch)
treef3f50ec898e4a58a8832047e598219068a9b304f /generic/tclPanic.c
parentbd3fec22b475c3e3e0420a4db76adc41b1cdd8bf (diff)
downloadtcl-cb1f5ad4901220060bc319970cf3434734b3a1aa.zip
tcl-cb1f5ad4901220060bc319970cf3434734b3a1aa.tar.gz
tcl-cb1f5ad4901220060bc319970cf3434734b3a1aa.tar.bz2
Decorate Tcl_Panic and Tcl_PanicVA with the noreturn option, alowing further optimizations by the C-compiler.panic_noreturn
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. */