From: Richard Kenner <kenner@gcc.gnu.org>
Date: Mon, 16 May 1994 21:43:38 +0000 (-0400)
Subject: (REAL_VALUE_FROM_TARGET_SINGLE, .._DOUBLE): Change arg from long to
X-Git-Tag: misc/cutover-egcs-0~6632
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=403cd5d7f822a8e000cf814275f4fecaa25fa591;p=thirdparty%2Fgcc.git

(REAL_VALUE_FROM_TARGET_SINGLE, .._DOUBLE): Change arg from long to
HOST_WIDE_INT.

From-SVN: r7311
---

diff --git a/gcc/real.h b/gcc/real.h
index 28dce267931e..7a885441b528 100644
--- a/gcc/real.h
+++ b/gcc/real.h
@@ -148,8 +148,8 @@ extern long etarsingle		PROTO((REAL_VALUE_TYPE));
 extern void ereal_to_decimal	PROTO((REAL_VALUE_TYPE, char *));
 extern int ereal_cmp		PROTO((REAL_VALUE_TYPE, REAL_VALUE_TYPE));
 extern int ereal_isneg		PROTO((REAL_VALUE_TYPE));
-extern REAL_VALUE_TYPE ereal_from_float PROTO((unsigned long));
-extern REAL_VALUE_TYPE ereal_from_double PROTO((unsigned long *));
+extern REAL_VALUE_TYPE ereal_from_float PROTO((HOST_WIDE_INT));
+extern REAL_VALUE_TYPE ereal_from_double PROTO((HOST_WIDE_INT *));
 
 #define REAL_VALUES_EQUAL(x, y) (ereal_cmp ((x), (y)) == 0)
 /* true if x < y : */
@@ -194,10 +194,11 @@ extern REAL_VALUE_TYPE real_value_truncate ();
 /* IN is a REAL_VALUE_TYPE.  OUT is a long. */
 #define REAL_VALUE_TO_TARGET_SINGLE(IN, OUT) ((OUT) = etarsingle ((IN)))
 
-/* d is an array of longs. */
+/* d is an array of HOST_WIDE_INT that holds a double precision
+   value in the target computer's floating point format. */
 #define REAL_VALUE_FROM_TARGET_DOUBLE(d)  (ereal_from_double (d))
 
-/* f is a long. */
+/* f is a HOST_WIDE_INT containing a single precision target float value. */
 #define REAL_VALUE_FROM_TARGET_SINGLE(f)  (ereal_from_float (f))
 
 /* Conversions to decimal ASCII string.  */