summaryrefslogtreecommitdiffstats
path: root/generic/tclExecute.c
diff options
context:
space:
mode:
authordas <das>2006-03-24 00:52:07 (GMT)
committerdas <das>2006-03-24 00:52:07 (GMT)
commitb543fbb1683bb82976f50c0a4f7f0c9bf9dd7a70 (patch)
tree225a5a0c60620ac0f8e7a906e400f546a1c4cf60 /generic/tclExecute.c
parent345803bf3e7c8a363e635547ff1cc4932a0d1db1 (diff)
downloadtcl-b543fbb1683bb82976f50c0a4f7f0c9bf9dd7a70.zip
tcl-b543fbb1683bb82976f50c0a4f7f0c9bf9dd7a70.tar.gz
tcl-b543fbb1683bb82976f50c0a4f7f0c9bf9dd7a70.tar.bz2
avoid unused var compiler warning
Diffstat (limited to 'generic/tclExecute.c')
-rw-r--r--generic/tclExecute.c4
1 files 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. */