summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-11-19 21:45:34 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-11-19 21:45:34 (GMT)
commit36353f6c04ced7f2f47bd497272b5f291f14e6ad (patch)
tree3d9be6fa29eb1f03b84b3492b58a3a47c1f0e843
parentdc94f0158e25e5fd110f4aee8c223078cb4a4757 (diff)
downloadtcl-36353f6c04ced7f2f47bd497272b5f291f14e6ad.zip
tcl-36353f6c04ced7f2f47bd497272b5f291f14e6ad.tar.gz
tcl-36353f6c04ced7f2f47bd497272b5f291f14e6ad.tar.bz2
eliminate unused variable
-rwxr-xr-xgeneric/tclStrToD.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index 9f81c13..2287a16 100755
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.c
@@ -525,7 +525,6 @@ TclParseNumber(
char d = 0; /* Last hexadecimal digit scanned; initialized
* to avoid a compiler warning. */
int shift = 0; /* Amount to shift when accumulating binary */
- int explicitOctal = 0;
#define ALL_BITS (~(Tcl_WideUInt)0)
#define MOST_BITS (ALL_BITS >> 1)
@@ -637,7 +636,6 @@ TclParseNumber(
goto zerob;
}
if (c == 'o' || c == 'O') {
- explicitOctal = 1;
state = ZERO_O;
break;
}