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 | e59a1e0b1444fee36e3fed174465983c356e11f5 (patch) | |
| tree | 3d9be6fa29eb1f03b84b3492b58a3a47c1f0e843 | |
| parent | c4b5bfbd507454a4c2dfa42c34eeb33579833735 (diff) | |
| download | tcl-e59a1e0b1444fee36e3fed174465983c356e11f5.zip tcl-e59a1e0b1444fee36e3fed174465983c356e11f5.tar.gz tcl-e59a1e0b1444fee36e3fed174465983c356e11f5.tar.bz2 | |
eliminate unused variable
| -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; } |