From 9b91bc2295fa16b69418801d2fa0d505036bfac5 Mon Sep 17 00:00:00 2001
From: Mark Alexander <marka@cygnus>
Date: Thu, 19 Jun 1997 15:18:13 +0000
Subject: [PATCH] 	* utils.c (floatformat_from_doublest): Improve test
 for infinity.

---
 gdb/ChangeLog | 4 ++++
 gdb/utils.c   | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 62048f46610..4aeeeddeb98 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+Thu Jun 19 08:18:48 1997  Mark Alexander  <marka@cygnus.com>
+
+	* utils.c (floatformat_from_doublest): Improve test for infinity.
+
 Wed Jun 18 13:47:52 1997  Fred Fish  <fnf@cygnus.com>
 
 	* dwarfread.c (isreg, optimized_out, offreg, basereg): Move
diff --git a/gdb/utils.c b/gdb/utils.c
index e4de8531514..716f92ef831 100644
--- a/gdb/utils.c
+++ b/gdb/utils.c
@@ -2387,7 +2387,7 @@ floatformat_from_doublest (fmt, from, to)
       dfrom = -dfrom;
     }
 
-  if (dfrom + 1 == dfrom)	/* Result is Infinity */
+  if (dfrom + dfrom == dfrom && dfrom != 0.0)	/* Result is Infinity */
     {
       /* Infinity exponent is same as NaN's.  */
       put_field (uto, fmt->byteorder, fmt->totalsize, fmt->exp_start,
-- 
2.30.2