From 08e4f14e0f32d64cd4cbb48601cccbaf525a272a Mon Sep 17 00:00:00 2001
From: "jan.nijtmans" <nijtmans@users.sourceforge.net>
Date: Mon, 14 Mar 2011 12:30:44 +0000
Subject: Eliminate some more unneeded write-only variables (discovered by
 gcc-4.6)

---
 generic/tkBind.c     | 5 ++---
 generic/tkCanvUtil.c | 3 ---
 generic/tkFocus.c    | 3 +--
 3 files changed, 3 insertions(+), 8 deletions(-)

diff --git a/generic/tkBind.c b/generic/tkBind.c
index ec46650..e77667f 100644
--- a/generic/tkBind.c
+++ b/generic/tkBind.c
@@ -192,7 +192,7 @@ typedef struct {
 typedef struct PatSeq {
     int numPats;		/* Number of patterns in sequence (usually
 				 * 1). */
-    char *script;		/* Binding script to evaluate when sequence 
+    char *script;		/* Binding script to evaluate when sequence
 				 * matches (ckalloc()ed) */
     int flags;			/* Miscellaneous flag values; see below for
 				 * definitions. */
@@ -1223,7 +1223,7 @@ Tk_BindEvent(
     TkDisplay *oldDispPtr;
     XEvent *ringPtr;
     PatSeq *vMatchDetailList, *vMatchNoDetailList;
-    int flags, oldScreen, i;
+    int flags, oldScreen;
     Tcl_Interp *interp;
     Tcl_DString scripts, savedResult;
     Detail detail;
@@ -1475,7 +1475,6 @@ Tk_BindEvent(
 
     p = Tcl_DStringValue(&scripts);
     end = p + Tcl_DStringLength(&scripts);
-    i = 0;
 
     /*
      * Be carefule when dereferencing screenPtr or bindInfoPtr. If we evaluate
diff --git a/generic/tkCanvUtil.c b/generic/tkCanvUtil.c
index 964e2af..60f06c7 100644
--- a/generic/tkCanvUtil.c
+++ b/generic/tkCanvUtil.c
@@ -1639,8 +1639,6 @@ TkCanvTranslatePath(
     double *a, *b, *t;		/* Pointers to parts of the temporary
 				 * storage */
     int i, j;			/* Loop counters */
-    int maxOutput;		/* Maximum number of outputs that we will
-				 * allow */
     double limit[4];		/* Boundries at which clipping occurs */
     double staticSpace[480];	/* Temp space from the stack */
 
@@ -1735,7 +1733,6 @@ TkCanvTranslatePath(
      * This is the loop that makes the four passes through the data.
      */
 
-    maxOutput = numVertex*3;
     for (j=0; j<4; j++){
 	double xClip = limit[j];
 	int inside = a[0] < xClip;
diff --git a/generic/tkFocus.c b/generic/tkFocus.c
index 17482aa..0448dc9 100644
--- a/generic/tkFocus.c
+++ b/generic/tkFocus.c
@@ -1067,10 +1067,9 @@ TkFocusSplit(
 				 * new toplevel. */
 {
     ToplevelFocusInfo *tlFocusPtr;
-    DisplayFocusInfo *displayFocusPtr;
     TkWindow *topLevelPtr, *subWinPtr;
 
-    displayFocusPtr = FindDisplayFocusInfo(winPtr->mainPtr, winPtr->dispPtr);
+    FindDisplayFocusInfo(winPtr->mainPtr, winPtr->dispPtr);
 
     /*
      * Find the top-level window for winPtr, then find (or create) a record
-- 
cgit v0.12