diff options
| author | das <das> | 2006-03-24 00:52:07 (GMT) |
|---|---|---|
| committer | das <das> | 2006-03-24 00:52:07 (GMT) |
| commit | b543fbb1683bb82976f50c0a4f7f0c9bf9dd7a70 (patch) | |
| tree | 225a5a0c60620ac0f8e7a906e400f546a1c4cf60 /generic/tclExecute.c | |
| parent | 345803bf3e7c8a363e635547ff1cc4932a0d1db1 (diff) | |
| download | tcl-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.c | 4 |
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. */ |