diff options
author | davygrvy <davygrvy> | 2004-10-27 00:56:33 (GMT) |
---|---|---|
committer | davygrvy <davygrvy> | 2004-10-27 00:56:33 (GMT) |
commit | f068b3c8aa0a0bfed87b981e99a3b096aed995d5 (patch) | |
tree | 7584c0c682e4e97811f0996861722c6ad9401f04 /win/tkWinX.c | |
parent | 8827901209d887d86a5625b7f71bcc5831110cf1 (diff) | |
download | tk-f068b3c8aa0a0bfed87b981e99a3b096aed995d5.zip tk-f068b3c8aa0a0bfed87b981e99a3b096aed995d5.tar.gz tk-f068b3c8aa0a0bfed87b981e99a3b096aed995d5.tar.bz2 |
* win/tkWinX.c: Signature for tkWinXCleanup needed to be
* generic/tkInt.decls: changed so it matches the Tcl_ExitProc
* generic/tkIntPlatDecls.h: typedef to avoid a bad-style cast.
* win/makefile.vc: Force TCL_LIBRARY envar when calling tclsh
Diffstat (limited to 'win/tkWinX.c')
-rw-r--r-- | win/tkWinX.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/win/tkWinX.c b/win/tkWinX.c index 1bef5c4..d00214f 100644 --- a/win/tkWinX.c +++ b/win/tkWinX.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinX.c,v 1.34 2004/09/24 01:15:07 patthoyts Exp $ + * RCS: @(#) $Id: tkWinX.c,v 1.35 2004/10/27 00:56:33 davygrvy Exp $ */ #include "tkWinInt.h" @@ -289,8 +289,7 @@ TkWinXInit(hInstance) /* * Make sure we cleanup on finalize. */ - TkCreateExitHandler((Tcl_ExitProc *) TkWinXCleanup, - (ClientData) hInstance); + TkCreateExitHandler(TkWinXCleanup, (ClientData) hInstance); } /* @@ -310,9 +309,10 @@ TkWinXInit(hInstance) */ void -TkWinXCleanup(hInstance) - HINSTANCE hInstance; +TkWinXCleanup(clientData) + ClientData clientData; { + HINSTANCE hInstance = (HINSTANCE) clientData; /* * Clean up our own class. */ |