diff options
| author | law <law@138bc75d-0d04-0410-961f-82ee72b054a4> | 1997-08-12 17:13:25 +0000 |
|---|---|---|
| committer | law <law@138bc75d-0d04-0410-961f-82ee72b054a4> | 1997-08-12 17:13:25 +0000 |
| commit | 72227be3c12711d72770652228fe52122b35c71d (patch) | |
| tree | 6af686cdfe6c11c549f23151dfd216cd90b4573f /gcc/real.h | |
| parent | 3f7bb88fb8f0c3240002abab71c03edfd2d608fa (diff) | |
| download | gcc-72227be3c12711d72770652228fe52122b35c71d.tar.gz | |
* version.c: Bump version to "gcc-3.0.0 970802 experimental".
* gcc.info*: Rebuilt.
* COPYING.g77, README.g77: New files.
* real.c (ereal_unto_float, ereal_unto_double): New functions.
* real.h (ereal_unto_float, ereal_unto_double): Declare them.
(REAL_VALUE_UNTO_TARGET_DOUBLE, REAL_VALUE_UNTO_TARGET_SINGLE): Define.
Get g77 to work with gcc3.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@14776 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/real.h')
| -rw-r--r-- | gcc/real.h | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/real.h b/gcc/real.h index c57ccc1cff3..5d4b87fe6b0 100644 --- a/gcc/real.h +++ b/gcc/real.h @@ -153,6 +153,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_unto_float PROTO((long)); +extern REAL_VALUE_TYPE ereal_unto_double PROTO((long *)); extern REAL_VALUE_TYPE ereal_from_float PROTO((HOST_WIDE_INT)); extern REAL_VALUE_TYPE ereal_from_double PROTO((HOST_WIDE_INT *)); @@ -200,6 +202,12 @@ 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))) +/* Inverse of REAL_VALUE_TO_TARGET_DOUBLE. */ +#define REAL_VALUE_UNTO_TARGET_DOUBLE(d) (ereal_unto_double (d)) + +/* Inverse of REAL_VALUE_TO_TARGET_SINGLE. */ +#define REAL_VALUE_UNTO_TARGET_SINGLE(f) (ereal_unto_float (f)) + /* 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)) |