From: Richard Stallman <rms@gnu.org>
Date: Sat, 28 Mar 1992 00:07:20 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Tag: misc/cutover-egcs-0~13327
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=11030a604b97b88d30a15173946a966628451155;p=thirdparty%2Fgcc.git

*** empty log message ***

From-SVN: r604
---

diff --git a/gcc/real.h b/gcc/real.h
index 33b71670f844..3f8c3aa5fb03 100644
--- a/gcc/real.h
+++ b/gcc/real.h
@@ -142,9 +142,14 @@ extern double (atof) ();
 #define REAL_VALUE_ISNAN(x) (target_isnan (x))
 #endif
 
+/* Determine whether a floating-point value X is negative. */
+#ifndef REAL_VALUE_NEGATIVE
+#define REAL_VALUE_NEGATIVE(x) (target_negative (x))
+#endif
+
 /* Determine whether a floating-point value X is minus 0. */
 #ifndef REAL_VALUE_MINUS_ZERO
-#define REAL_VALUE_MINUS_ZERO(x) (target_minus_zero (x))
+#define REAL_VALUE_MINUS_ZERO(x) ((x) == 0 && REAL_VALUE_NEGATIVE (x))
 #endif
 
 /* Constant real values 0, 1, 2, and -1.  */