import gdb-1999-09-08 snapshot

[thirdparty/binutils-gdb.git] / gdb / valprint.c

diff --git a/gdb/valprint.c b/gdb/valprint.c
index 2f07114ff962697f2ad4d37fe887c56d0b5a08b9..60a34be61021bdd92107e10ea6daab240e99e38b 100644 (file)
--- a/gdb/valprint.c
+++ b/gdb/valprint.c
@@ -623,10 +623,16 @@ print_floating (valaddr, type, stream)
        high &= 0xfffff;
       }
     else
-      /* Extended.  We can't detect NaNs for extendeds yet.  Also note
-         that currently extendeds get nuked to double in
-         REGISTER_CONVERTIBLE.  */
-      is_nan = 0;
+      {
+#ifdef TARGET_ANALYZE_FLOATING
+       TARGET_ANALYZE_FLOATING;
+#else
+       /* Extended.  We can't detect extended NaNs for this target.
+          Also note that currently extendeds get nuked to double in
+          REGISTER_CONVERTIBLE.  */
+       is_nan = 0;
+#endif 
+      }
 
     if (is_nan)
       {
@@ -635,7 +641,7 @@ print_floating (valaddr, type, stream)
           (in an implementation-defined manner) distinguish between
           signaling and quiet NaN's.  */
        if (high)
-         fprintf_filtered (stream, "-NaN(0x%lx%.8lx)" + nonnegative,
+         fprintf_filtered (stream, "-NaN(0x%lx%.8lx)" + !!nonnegative,
                            high, low);
        else
          fprintf_filtered (stream, "-NaN(0x%lx)" + nonnegative, low);