From: rms <rms@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Sat, 28 Mar 1992 00:07:20 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Url: http://git.sourceforge.jp/view?a=commitdiff_plain;h=3d0a4c4d23c2093bc7d77ac96d64852c0f6f162b;p=pf3gnuchains%2Fgcc-fork.git

*** empty log message ***


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@604 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/real.h b/gcc/real.h
index 33b71670f84..3f8c3aa5fb0 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.  */