diff options
author | jan.nijtmans <jan.nijtmans@noemail.net> | 2011-08-13 22:29:46 (GMT) |
---|---|---|
committer | jan.nijtmans <jan.nijtmans@noemail.net> | 2011-08-13 22:29:46 (GMT) |
commit | 26d2b9438b2de54f5624c5d45066c36564c7618d (patch) | |
tree | 396cc9a1f30e93ac14c8698b1d0008c4af8ffb93 /win | |
parent | d077b4a1d44dcf147e1f2bd5c8bb4439be81e772 (diff) | |
parent | 271966979ebb23d1d9b80acc63b314d1afb8f22d (diff) | |
download | tk-26d2b9438b2de54f5624c5d45066c36564c7618d.zip tk-26d2b9438b2de54f5624c5d45066c36564c7618d.tar.gz tk-26d2b9438b2de54f5624c5d45066c36564c7618d.tar.bz2 |
[Bug 3388350] mingw64 compiler warnings
FossilOrigin-Name: c911734fe6673f48d950b30a2c53ce54b7f8c8c2
Diffstat (limited to 'win')
-rw-r--r-- | win/tkWinDialog.c | 3 | ||||
-rw-r--r-- | win/tkWinSend.c | 3 | ||||
-rw-r--r-- | win/tkWinSendCom.c | 3 |
3 files changed, 3 insertions, 6 deletions
diff --git a/win/tkWinDialog.c b/win/tkWinDialog.c index 06372be..ba4c2df 100644 --- a/win/tkWinDialog.c +++ b/win/tkWinDialog.c @@ -577,7 +577,7 @@ GetFileName( OFNData ofnData; int cdlgerr; int filterIndex = 0, result = TCL_ERROR, winCode, oldMode, i, multi = 0; - const char *extension = NULL, *filter = NULL, *title = NULL; + const char *extension = NULL, *title = NULL; Tk_Window tkwin = clientData; HWND hWnd; Tcl_Obj *filterObj = NULL, *initialTypeObj = NULL, *typeVariableObj = NULL; @@ -703,7 +703,6 @@ GetFileName( &filterIndex) != TCL_OK) { goto end; } - filter = Tcl_DStringValue(&utfFilterString); Tk_MakeWindowExist(tkwin); hWnd = Tk_GetHWND(Tk_WindowId(tkwin)); diff --git a/win/tkWinSend.c b/win/tkWinSend.c index 7fc7339..b3edc62 100644 --- a/win/tkWinSend.c +++ b/win/tkWinSend.c @@ -992,12 +992,11 @@ SendEventProc( Tcl_Event *eventPtr, int flags) { - int result = TCL_OK; SendEvent *evPtr = (SendEvent *)eventPtr; TRACE("SendEventProc\n"); - result = Tcl_EvalObjEx(evPtr->interp, evPtr->cmdPtr, + Tcl_EvalObjEx(evPtr->interp, evPtr->cmdPtr, TCL_EVAL_DIRECT | TCL_EVAL_GLOBAL); Tcl_DecrRefCount(evPtr->cmdPtr); diff --git a/win/tkWinSendCom.c b/win/tkWinSendCom.c index 77bc1b5..c67e533 100644 --- a/win/tkWinSendCom.c +++ b/win/tkWinSendCom.c @@ -372,7 +372,6 @@ Async( UINT *puArgErr) { HRESULT hr = S_OK; - int result = TCL_OK; VARIANT vCmd; VariantInit(&vCmd); @@ -390,7 +389,7 @@ Async( Tcl_Obj *scriptPtr = Tcl_NewUnicodeObj(vCmd.bstrVal, (int) SysStringLen(vCmd.bstrVal)); - result = TkWinSend_QueueCommand(obj->interp, scriptPtr); + TkWinSend_QueueCommand(obj->interp, scriptPtr); } } |