* print-tree.c (print_node_brief, print_node): Print sign of Inf.

From-SVN: r117506

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index a34d77e47bf1561db1ade4f6b247598b880f80d5..7625c494df01d4745e67bd4423e2fdbe9fc43799 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2006-10-06  J"orn Rennecke  <joern.rennecke@st.com>
+
+       * print-tree.c (print_node_brief, print_node): Print sign of Inf.
+
 2006-10-06  J"orn Rennecke  <joern.rennecke@st.com>
 
        * config/sh/sh.h (LIBGCC2_DOUBLE_TYPE_SIZE): Define.

diff --git a/gcc/print-tree.c b/gcc/print-tree.c
index b207fe30a5430f97d27d398d89c974b068694c7a..57b07ace4bb6352416bbf9436b9f2642b3273257 100644 (file)
--- a/gcc/print-tree.c
+++ b/gcc/print-tree.c
@@ -138,7 +138,7 @@ print_node_brief (FILE *file, const char *prefix, tree node, int indent)
 
       d = TREE_REAL_CST (node);
       if (REAL_VALUE_ISINF (d))
-       fprintf (file, " Inf");
+       fprintf (file,  REAL_VALUE_NEGATIVE (d) ? " -Inf" : " Inf");
       else if (REAL_VALUE_ISNAN (d))
        fprintf (file, " Nan");
       else
@@ -709,7 +709,7 @@ print_node (FILE *file, const char *prefix, tree node, int indent)
 
            d = TREE_REAL_CST (node);
            if (REAL_VALUE_ISINF (d))
-             fprintf (file, " Inf");
+             fprintf (file,  REAL_VALUE_NEGATIVE (d) ? " -Inf" : " Inf");
            else if (REAL_VALUE_ISNAN (d))
              fprintf (file, " Nan");
            else