summaryrefslogtreecommitdiffstats
path: root/win
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-13 22:29:46 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2011-08-13 22:29:46 (GMT)
commitdff96aa27cdba340f38ae9fe05fd4ebb46f767c6 (patch)
tree396cc9a1f30e93ac14c8698b1d0008c4af8ffb93 /win
parent7d86aadfc1e60d69b218408955975c988e33c977 (diff)
parent8ef38a7e1335498220c1dad6109c3f035f878ffa (diff)
downloadtk-dff96aa27cdba340f38ae9fe05fd4ebb46f767c6.zip
tk-dff96aa27cdba340f38ae9fe05fd4ebb46f767c6.tar.gz
tk-dff96aa27cdba340f38ae9fe05fd4ebb46f767c6.tar.bz2
[Bug 3388350] mingw64 compiler warnings
Diffstat (limited to 'win')
-rw-r--r--win/tkWinDialog.c3
-rw-r--r--win/tkWinSend.c3
-rw-r--r--win/tkWinSendCom.c3
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);
}
}