From b543fbb1683bb82976f50c0a4f7f0c9bf9dd7a70 Mon Sep 17 00:00:00 2001
From: das <das>
Date: Fri, 24 Mar 2006 00:52:07 +0000
Subject: avoid unused var compiler warning

---
 generic/tclExecute.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/generic/tclExecute.c b/generic/tclExecute.c
index 73aecb0..73b12f6 100644
--- a/generic/tclExecute.c
+++ b/generic/tclExecute.c
@@ -12,7 +12,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclExecute.c,v 1.228 2006/03/23 22:28:43 dgp Exp $
+ * RCS: @(#) $Id: tclExecute.c,v 1.229 2006/03/24 00:52:07 das Exp $
  */
 
 #include "tclInt.h"
@@ -4764,9 +4764,9 @@ TclExecuteByteCode(
 	 */
 
 	double d1, d2;
-	double dResult = 0.0;		/* Init. avoids compiler warning. */
 	Tcl_Obj *valuePtr,*value2Ptr;
 #if 0
+	double dResult = 0.0;		/* Init. avoids compiler warning. */
 	Tcl_ObjType *t1Ptr, *t2Ptr;
 	long i = 0, i2 = 0, quot;	/* Init. avoids compiler warning. */
 	long iResult = 0;		/* Init. avoids compiler warning. */
-- 
cgit v0.12