OSDN Git Service

(build_real): Add `overflow' var; pass to CHECK_FLOAT_VALUE.
authorkenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 20 Mar 1994 11:27:53 +0000 (11:27 +0000)
committerkenner <kenner@138bc75d-0d04-0410-961f-82ee72b054a4>
Sun, 20 Mar 1994 11:27:53 +0000 (11:27 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@6829 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/tree.c

index 18eb485..bb40fd3 100644 (file)
@@ -1228,16 +1228,18 @@ build_real (type, d)
      REAL_VALUE_TYPE d;
 {
   tree v;
+  int overflow = 0;
 
   /* Check for valid float value for this type on this target machine;
      if not, can print error message and store a valid value in D.  */
 #ifdef CHECK_FLOAT_VALUE
-  CHECK_FLOAT_VALUE (TYPE_MODE (type), d);
+  CHECK_FLOAT_VALUE (TYPE_MODE (type), d, overflow);
 #endif
 
   v = make_node (REAL_CST);
   TREE_TYPE (v) = type;
   TREE_REAL_CST (v) = d;
+  TREE_OVERFLOW (v) = TREE_CONSTANT_OVERFLOW (v) = overflow;
   return v;
 }