diff --git a/components/jcf2/Parse/BuildTokenList.pas b/components/jcf2/Parse/BuildTokenList.pas index 413013044a..475a0a8e69 100644 --- a/components/jcf2/Parse/BuildTokenList.pas +++ b/components/jcf2/Parse/BuildTokenList.pas @@ -662,7 +662,7 @@ begin ie one dat = decimal two dots = end of number } - lbFirstDigit := True; + lbFirstDigit := False; while CharIsDigit(Current) or (Current = '.') or CharIsDigitSeparator(Current,lbFirstDigit) do begin lbFirstDigit := False;