diff options
author | hypnotoad <yoda@etoyoc.com> | 2014-09-02 20:26:50 (GMT) |
---|---|---|
committer | hypnotoad <yoda@etoyoc.com> | 2014-09-02 20:26:50 (GMT) |
commit | bcbee420745af97730182230b0f5df4ea83360cc (patch) | |
tree | 20e91d28ab931aaad9943fcd0b402204674f5d8c | |
parent | bbac82cc3e0f87e84508657cb8d993e39fcbe141 (diff) | |
download | tcl-bcbee420745af97730182230b0f5df4ea83360cc.zip tcl-bcbee420745af97730182230b0f5df4ea83360cc.tar.gz tcl-bcbee420745af97730182230b0f5df4ea83360cc.tar.bz2 |
Revised patch (per ferrieux)
-rw-r--r-- | generic/tclEvent.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEvent.c b/generic/tclEvent.c index 3bb6c62..a7cd467 100644 --- a/generic/tclEvent.c +++ b/generic/tclEvent.c @@ -1299,7 +1299,7 @@ Tcl_FinalizeThread(void) TclFinalizeAsync(); TclFinalizeThreadObjects(); } - if (!TclInExit()) { + if (TclFullFinalizationRequested()) { /* * Blow away all thread local storage blocks. * |