OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

(yylex): For floats, Use REAL_VALUES_LESS to distinguish underflow from overflow. 

(yylex): For floats, Use REAL_VALUES_LESS to distinguish
underflow from overflow.  Delete special case for 0.0.

From-SVN: r2363
This commit is contained in:
Richard Stallman 1992-10-08 07:13:12 +00:00
parent 09a99207ea
commit 547ad55772
1 changed files with 4 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
gcc/c-lex.c
View File

@ -1370,24 +1370,10 @@ yylex ()
#ifdef ERANGE
if (errno == ERANGE && !flag_traditional && pedantic)
{
char *p1 = token_buffer;
/* Check for "0.0" and variants;
SunOS 4 spuriously returns ERANGE for them. */
while (*p1 == '0') p1++;
if (*p1 == '.')
{
p1++;
while (*p1 == '0') p1++;
}
if (*p1 == 'e' || *p1 == 'E')
{
/* with significand==0, ignore the exponent */
p1++;
while (*p1 != 0) p1++;
}
/* ERANGE is also reported for underflow,
so test the value to distinguish overflow from that. */
if (*p1 != 0 && (value > 1.0 || value < -1.0))
/* ERANGE is also reported for underflow,
so test the value to distinguish overflow from that. */
if (REAL_VALUES_LESS (dconst1, value)
|| REAL_VALUES_LESS (value, dconstm1))
{
pedwarn ("floating point number exceeds range of `double'");
exceeds_double = 1;