summaryrefslogtreecommitdiffstats
path: root/win/tkWinMenu.c
diff options
context:
space:
mode:
authordavygrvy <davygrvy@noemail.net>2003-12-21 23:50:13 (GMT)
committerdavygrvy <davygrvy@noemail.net>2003-12-21 23:50:13 (GMT)
commit46d3c7a201e8862c6e18d23809f5245cc2356ab9 (patch)
tree0dd59c8ef95660d1afe7967786a7a4fd4f6bdedd /win/tkWinMenu.c
parentb40ed78a82fb1a44bf14078b5348df1868a85c48 (diff)
downloadtk-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 'win/tkWinMenu.c')
-rw-r--r--win/tkWinMenu.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/win/tkWinMenu.c b/win/tkWinMenu.c
index bf8c2d4..f366cf7 100644
--- a/win/tkWinMenu.c
+++ b/win/tkWinMenu.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: tkWinMenu.c,v 1.25 2003/12/16 03:12:51 davygrvy Exp $
+ * RCS: @(#) $Id: tkWinMenu.c,v 1.26 2003/12/21 23:50:13 davygrvy Exp $
*/
#define OEMRESOURCE
@@ -2990,7 +2990,7 @@ TkpMenuInit()
tsdPtr->menuHWND = CreateWindow(MENU_CLASS_NAME, "MenuWindow", WS_POPUP,
0, 0, 10, 10, NULL, NULL, Tk_GetHINSTANCE(), NULL);
- Tcl_CreateExitHandler(MenuExitHandler, (ClientData) NULL);
+ TkCreateExitHandler(MenuExitHandler, (ClientData) NULL);
SetDefaults(1);
}