diff options
| author | davygrvy <davygrvy@noemail.net> | 2003-12-21 23:50:13 (GMT) |
|---|---|---|
| committer | davygrvy <davygrvy@noemail.net> | 2003-12-21 23:50:13 (GMT) |
| commit | 46d3c7a201e8862c6e18d23809f5245cc2356ab9 (patch) | |
| tree | 0dd59c8ef95660d1afe7967786a7a4fd4f6bdedd /unix | |
| parent | b40ed78a82fb1a44bf14078b5348df1868a85c48 (diff) | |
| download | tk-46d3c7a201e8862c6e18d23809f5245cc2356ab9.zip tk-46d3c7a201e8862c6e18d23809f5245cc2356ab9.tar.gz tk-46d3c7a201e8862c6e18d23809f5245cc2356ab9.tar.bz2 | |
* generic/tkEvent.c: Added three new functions: TkCreateExitHandler,
* generic/tkInt.h: TkDeleteExitHandler, and TkFinalize. This adds
* generic/tkMenu.c: an insertion point so Tk's exit handlers can be
* generic/tkWindow.c: called on their own from tk85.dll's DllMain
* mac/tkMacButton.c: for DLL_PROCESS_DETACH. These are private to
* unix/tkUnixEvent.c: the binary and not exported. It is possible
* win/tkWin32Dll.c: the Windows OS can unload Tk _prior_ to Tcl
* win/tkWinEmbed.c: under some conditions such as ExitProcess().
* win/tkWinMenu.c: This avoids a dangling pointer problem when Tcl
* win/tkWinX.c: does Tcl_Finalize after Tk has been unloaded.
* win/winMain.c: DllMain's DLL_PROCESS_DETACH now protected with
SEH as DeleteWindowsExitProc is causing an
exception of its own under some teardown
conditions. AT&T assembly syntax has not been
added for MinGW yet. [Tcl Patch 858493]
FossilOrigin-Name: e12249878fe2fa70e532f6629a899a96c165e3e3
Diffstat (limited to 'unix')
| -rw-r--r-- | unix/tkUnixEvent.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/tkUnixEvent.c b/unix/tkUnixEvent.c index de250a1..b4c1654 100644 --- a/unix/tkUnixEvent.c +++ b/unix/tkUnixEvent.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkUnixEvent.c,v 1.12 2003/07/02 09:22:45 mdejong Exp $ + * RCS: @(#) $Id: tkUnixEvent.c,v 1.13 2003/12/21 23:50:13 davygrvy Exp $ */ #include "tkInt.h" @@ -81,7 +81,7 @@ TkCreateXEventSource() if (!tsdPtr->initialized) { tsdPtr->initialized = 1; Tcl_CreateEventSource(DisplaySetupProc, DisplayCheckProc, NULL); - Tcl_CreateExitHandler(DisplayExitHandler, NULL); + TkCreateExitHandler(DisplayExitHandler, NULL); } } |