diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-19 21:57:09 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-19 21:57:09 (GMT) |
| commit | b8bb091e43904fa2897b72f1853d1d9f298d26ac (patch) | |
| tree | 2e1c470dd2a4ee3ac2773f9bd6ee3feb8668be63 /generic/tclStrToD.c | |
| parent | 9c8731a3a9259e66d93d399531844eebc954544e (diff) | |
| parent | 7f4b300e2a1f846f1aff77518a22caf720b83725 (diff) | |
| download | tcl-tcl_nosize.zip tcl-tcl_nosize.tar.gz tcl-tcl_nosize.tar.bz2 | |
(Bad idea)tcl_nosize
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 af1aade..c2704a0 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; } |