From 754d2c4a65096e202ab877da6999ab304283f8d0 Mon Sep 17 00:00:00 2001
From: dgp <dgp@users.sourceforge.net>
Date: Tue, 29 Apr 2003 20:23:38 +0000
Subject: suppress compiler warning about uninitialized variables.

---
 generic/tclCmdIL.c | 11 ++++-------
 1 file changed, 4 insertions(+), 7 deletions(-)

diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c
index aba9dd3..a7f7fc0 100644
--- a/generic/tclCmdIL.c
+++ b/generic/tclCmdIL.c
@@ -15,7 +15,7 @@
  * See the file "license.terms" for information on usage and redistribution
  * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclCmdIL.c,v 1.49 2003/04/28 12:34:23 dkf Exp $
+ * RCS: @(#) $Id: tclCmdIL.c,v 1.50 2003/04/29 20:23:38 dgp Exp $
  */
 
 #include "tclInt.h"
@@ -308,10 +308,10 @@ Tcl_IncrObjCmd(dummy, interp, objc, objv)
     int objc;				/* Number of arguments. */
     Tcl_Obj *CONST objv[];		/* Argument objects. */
 {
-    long incrAmount;
+    long incrAmount = 1;
     Tcl_WideInt wideIncrAmount;
     Tcl_Obj *newValuePtr;
-    int isWide;
+    int isWide = 0;
     
     if ((objc != 2) && (objc != 3)) {
 	Tcl_WrongNumArgs(interp, 1, objv, "varName ?increment?");
@@ -322,10 +322,7 @@ Tcl_IncrObjCmd(dummy, interp, objc, objv)
      * Calculate the amount to increment by.
      */
     
-    if (objc == 2) {
-	incrAmount = 1;
-	isWide = 0;
-    } else {
+    if (objc == 3) {
 	/*
 	 * Need to be a bit cautious to ensure that [expr]-like rules
 	 * are enforced for interpretation of wide integers, despite
-- 
cgit v0.12