diff options
| author | nijtmans <nijtmans> | 2008-11-27 23:26:05 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2008-11-27 23:26:05 (GMT) |
| commit | bc5e27fa4adf93790848b01e6c80b0ca52414bcc (patch) | |
| tree | 20d24307a579f0fe7d3afb9b67a418e01a00c083 /win | |
| parent | 4cc4bd8988eb43ed337bcbe63481322726dd97d9 (diff) | |
| download | tk-bc5e27fa4adf93790848b01e6c80b0ca52414bcc.zip tk-bc5e27fa4adf93790848b01e6c80b0ca52414bcc.tar.gz tk-bc5e27fa4adf93790848b01e6c80b0ca52414bcc.tar.bz2 | |
elminate warning: unused variable 'tkwin'
Replace Tcl_SetResult(interp, NULL, ....) calls
with Tcl_ResetResult(interp) everywhere
Diffstat (limited to 'win')
| -rw-r--r-- | win/tkWinTest.c | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/win/tkWinTest.c b/win/tkWinTest.c index 14f32ce..c48dba5 100644 --- a/win/tkWinTest.c +++ b/win/tkWinTest.c @@ -11,7 +11,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkWinTest.c,v 1.22 2008/11/22 01:07:56 patthoyts Exp $ + * RCS: @(#) $Id: tkWinTest.c,v 1.23 2008/11/27 23:26:05 nijtmans Exp $ */ #include "tkWinInt.h" @@ -39,7 +39,6 @@ static int TestwinlocaleObjCmd(ClientData clientData, MODULE_SCOPE int TkplatformtestInit(Tcl_Interp *interp); static Tk_GetSelProc SetSelectionResult; - /* *---------------------------------------------------------------------- * @@ -480,8 +479,6 @@ TestwinlocaleObjCmd( int objc, /* Number of arguments. */ Tcl_Obj *const objv[]) /* Argument values. */ { - Tk_Window tkwin = (Tk_Window) clientData; - if (objc != 1) { Tcl_WrongNumArgs(interp, 1, objv, NULL); return TCL_ERROR; |