diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-18 22:25:04 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-18 22:25:04 (GMT) |
commit | 0b6248c50aeb2e05ea6f998675298dae0b42ad10 (patch) | |
tree | 0e0ce5c85adebfc681828a38656ecc69dd1e5b66 /win/tclWinFile.c | |
parent | 441aa364da925dc4c66389f43005c2f9ee7e3a12 (diff) | |
parent | 8bfcffa20a688e9e8b81a15034d61328ef87b3c4 (diff) | |
download | tcl-0b6248c50aeb2e05ea6f998675298dae0b42ad10.zip tcl-0b6248c50aeb2e05ea6f998675298dae0b42ad10.tar.gz tcl-0b6248c50aeb2e05ea6f998675298dae0b42ad10.tar.bz2 |
Rebase TIP-414 to TIP-512: If Tcl_SetPanicProc doesn't have a stub entry, it can take over the function of Tcl_InitSubsystems, just by changing its return value. TIP-512 description still to be adapted accordingly.
Diffstat (limited to 'win/tclWinFile.c')
-rw-r--r-- | win/tclWinFile.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/win/tclWinFile.c b/win/tclWinFile.c index dfeeef1..5a557fc 100644 --- a/win/tclWinFile.c +++ b/win/tclWinFile.c @@ -865,8 +865,7 @@ TclpFindExecutable( */ if (argv0 == NULL) { -# undef Tcl_SetPanicProc - Tcl_SetPanicProc(tclWinDebugPanic); + TclSetPanicProc(tclWinDebugPanic); } GetModuleFileNameW(NULL, wName, MAX_PATH); |