diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-26 14:24:20 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-26 14:24:20 (GMT) |
| commit | c7c23a434e6d12f8fb64b778470ecb18cccf783e (patch) | |
| tree | f54eafef612b63229c8289576e75af7369095ca3 /generic/tclPanic.c | |
| parent | 6ed69603db59ee390437a9eb54685869393a243c (diff) | |
| parent | 75b009d2316ab41a1ff6bd841da8fd207aba7b9d (diff) | |
| download | tcl-c7c23a434e6d12f8fb64b778470ecb18cccf783e.zip tcl-c7c23a434e6d12f8fb64b778470ecb18cccf783e.tar.gz tcl-c7c23a434e6d12f8fb64b778470ecb18cccf783e.tar.bz2 | |
typos.
On Cygwin, Tcl_SetPanicProc(NULL) should set back the panic proc to its default, which is not NULL.
Diffstat (limited to 'generic/tclPanic.c')
| -rw-r--r-- | generic/tclPanic.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclPanic.c b/generic/tclPanic.c index b87a8df..2a453b9 100644 --- a/generic/tclPanic.c +++ b/generic/tclPanic.c @@ -52,6 +52,10 @@ Tcl_SetPanicProc( #if defined(_WIN32) /* tclWinDebugPanic only installs if there is no panicProc yet. */ if ((proc != tclWinDebugPanic) || (panicProc == NULL)) +#elif defined(__CYGWIN__) + if (proc == NULL) + panicProc = tclWinDebugPanic; + else #endif panicProc = proc; } |