(yylex): Don't warn about floating point out of range if target

floating-point format is IEEE.

From-SVN: r4213

diff --git a/gcc/c-lex.c b/gcc/c-lex.c
index f4ab73c6cd3f3e8c7ced425fac6b130bfdc2fdc8..ea6c0156aa97bf25e491d7342650ac418229c168 100644 (file)
--- a/gcc/c-lex.c
+++ b/gcc/c-lex.c
@@ -1486,7 +1486,8 @@ yylex ()
              case 'f': case 'F':
                type = float_type_node;
                value = REAL_VALUE_ATOF (token_buffer, TYPE_MODE (type));
-               if (REAL_VALUE_ISINF (value) && pedantic)
+               if (TARGET_FLOAT_FORMAT != IEEE_FLOAT_FORMAT
+                   && REAL_VALUE_ISINF (value) && pedantic)
                  pedwarn ("floating point number exceeds range of `float'");
                garbage_chars = -1;
                break;
@@ -1494,7 +1495,8 @@ yylex ()
              case 'l': case 'L':
                type = long_double_type_node;
                value = REAL_VALUE_ATOF (token_buffer, TYPE_MODE (type));
-               if (REAL_VALUE_ISINF (value) && pedantic)
+               if (TARGET_FLOAT_FORMAT != IEEE_FLOAT_FORMAT
+                   && REAL_VALUE_ISINF (value) && pedantic)
                  pedwarn (
                      "floating point number exceeds range of `long double'");
                garbage_chars = -1;
@@ -1509,7 +1511,8 @@ yylex ()
 
               default:
                value = REAL_VALUE_ATOF (token_buffer, TYPE_MODE (type));
-               if (REAL_VALUE_ISINF (value) && pedantic)
+               if (TARGET_FLOAT_FORMAT != IEEE_FLOAT_FORMAT
+                   && REAL_VALUE_ISINF (value) && pedantic)
                  pedwarn ("floating point number exceeds range of `double'");
              }
            set_float_handler (NULL_PTR);
@@ -1519,8 +1522,9 @@ yylex ()
              {
                /* 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))
+               if (TARGET_FLOAT_FORMAT != IEEE_FLOAT_FORMAT
+                   && (REAL_VALUES_LESS (dconst1, value)
+                       || REAL_VALUES_LESS (value, dconstm1)))
                  {
                    pedwarn ("floating point number exceeds range of `double'");
                    exceeds_double = 1;