summaryrefslogtreecommitdiffstats
path: root/win/tclWinFile.c
diff options
context:
space:
mode:
authornijtmans@users.sourceforge.net <jan.nijtmans>2015-09-23 10:29:00 (GMT)
committernijtmans@users.sourceforge.net <jan.nijtmans>2015-09-23 10:29:00 (GMT)
commit059b07b9aa3f1c4375b20f3c8d8f23ecee1690f9 (patch)
tree453ef7765e2aeaef13b888bb260a18e6298fda26 /win/tclWinFile.c
parent7133978296f59ce009268aa903195a593e390c7c (diff)
parent72209ea7accec34ebd68d1d573c122e8c00663ec (diff)
downloadtcl-059b07b9aa3f1c4375b20f3c8d8f23ecee1690f9.zip
tcl-059b07b9aa3f1c4375b20f3c8d8f23ecee1690f9.tar.gz
tcl-059b07b9aa3f1c4375b20f3c8d8f23ecee1690f9.tar.bz2
Micro-optimization handling Tcl_Panic(), suggested by D. Richard Hipp.
As a side-effect, this is as well a fix for [1446864]: segfaults if Tcl_Panic() returns.
Diffstat (limited to 'win/tclWinFile.c')
-rwxr-xr-xwin/tclWinFile.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c
index 02927ad..f6e3a4b 100755
--- a/win/tclWinFile.c
+++ b/win/tclWinFile.c
@@ -172,7 +172,7 @@ static int WinLink(const TCHAR *LinkSource,
const TCHAR *LinkTarget, int linkAction);
static int WinSymLinkDirectory(const TCHAR *LinkDirectory,
const TCHAR *LinkTarget);
-MODULE_SCOPE void tclWinDebugPanic(const char *format, ...);
+MODULE_SCOPE TCL_NORETURN void tclWinDebugPanic(const char *format, ...);
/*
*--------------------------------------------------------------------
@@ -789,7 +789,7 @@ NativeWriteReparse(
*----------------------------------------------------------------------
*/
-void
+TCL_NORETURN void
tclWinDebugPanic(
const char *format, ...)
{