diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-19 21:45:34 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-19 21:45:34 (GMT) |
| commit | 36353f6c04ced7f2f47bd497272b5f291f14e6ad (patch) | |
| tree | 3d9be6fa29eb1f03b84b3492b58a3a47c1f0e843 /generic/tclStrToD.c | |
| parent | dc94f0158e25e5fd110f4aee8c223078cb4a4757 (diff) | |
| download | tcl-36353f6c04ced7f2f47bd497272b5f291f14e6ad.zip tcl-36353f6c04ced7f2f47bd497272b5f291f14e6ad.tar.gz tcl-36353f6c04ced7f2f47bd497272b5f291f14e6ad.tar.bz2 | |
eliminate unused variable
Diffstat (limited to 'generic/tclStrToD.c')
| -rwxr-xr-x | generic/tclStrToD.c | 2 |
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; } |