diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-06-04 14:38:54 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-06-04 14:38:54 (GMT) |
| commit | ee793dfa1eadb249a50933784a47bacc5d63ca14 (patch) | |
| tree | 1eee2a98637cdd00e322237630bb02f26658e730 /generic/tclStrToD.c | |
| parent | e1737976f9cb91cc83d3a65cfb2e00ce00e83afa (diff) | |
| parent | 1d722dd564f086e6aeda78f707816ebb3869146f (diff) | |
| download | tcl-ee793dfa1eadb249a50933784a47bacc5d63ca14.zip tcl-ee793dfa1eadb249a50933784a47bacc5d63ca14.tar.gz tcl-ee793dfa1eadb249a50933784a47bacc5d63ca14.tar.bz2 | |
Merge 8.6
Diffstat (limited to 'generic/tclStrToD.c')
| -rw-r--r-- | generic/tclStrToD.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c index 85b660d..6444823 100644 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -537,7 +537,7 @@ TclParseNumber( mp_err err = MP_OKAY; int under = 0; /* Flag trailing '_' as error if true once * number is accepted. */ - + #define ALL_BITS ((Tcl_WideUInt)-1) #define MOST_BITS (ALL_BITS >> 1) @@ -1256,7 +1256,7 @@ TclParseNumber( } } else { /* - * Back up to the last accepting state in the lexer. + * Back up to the last accepting state in the lexer. * If the last char seen is the numeric whitespace character '_', * backup to that. */ |