diff options
| author | Richard Kenner <kenner@gcc.gnu.org> | 1994-04-21 15:24:02 -0400 |
|---|---|---|
| committer | Richard Kenner <kenner@gcc.gnu.org> | 1994-04-21 15:24:02 -0400 |
| commit | fca04441218b5e306e0480170550ff6ac6a00b36 (patch) | |
| tree | 2da9c6e5c965a7e980c7b1173379f7c6173f532e | |
| parent | d6b12657988868c64a21f96fdb1b3ef12cd8f066 (diff) | |
| download | gcc-fca04441218b5e306e0480170550ff6ac6a00b36.zip gcc-fca04441218b5e306e0480170550ff6ac6a00b36.tar.gz gcc-fca04441218b5e306e0480170550ff6ac6a00b36.tar.bz2 | |
Add prototypes to declarations of functions in real.c.
(immed_real_const_1): Move declaration from rtl.h.
From-SVN: r7108
| -rw-r--r-- | gcc/real.h | 43 |
1 files changed, 31 insertions, 12 deletions
@@ -1,5 +1,5 @@ /* Front-end tree definitions for GNU compiler. - Copyright (C) 1989, 1991 Free Software Foundation, Inc. + Copyright (C) 1989, 1991, 1994 Free Software Foundation, Inc. This file is part of GNU CC. @@ -123,17 +123,33 @@ typedef struct { #define REAL_ARITHMETIC(value, code, d1, d2) \ earith (&(value), (code), &(d1), &(d2)) -/* Declare functions in real.c that are referenced here. */ -void earith (), ereal_from_uint (), ereal_from_int (), ereal_to_int (); -void etarldouble (), etartdouble (), etardouble (); -long etarsingle (); -HOST_WIDE_INT efixi (); -unsigned HOST_WIDE_INT efixui (); -int ereal_cmp (), ereal_isneg (); -unsigned int eroundui (); -REAL_VALUE_TYPE etrunci (), etruncui (), ereal_ldexp (), ereal_atof (); -REAL_VALUE_TYPE ereal_negate (), ereal_truncate (); -REAL_VALUE_TYPE ereal_from_float (), ereal_from_double (); +/* Declare functions in real.c. */ +extern void earith PROTO((REAL_VALUE_TYPE *, int, + REAL_VALUE_TYPE *, REAL_VALUE_TYPE *)); +extern REAL_VALUE_TYPE etrunci PROTO((REAL_VALUE_TYPE)); +extern REAL_VALUE_TYPE etruncui PROTO((REAL_VALUE_TYPE)); +extern REAL_VALUE_TYPE ereal_atof PROTO((char *, enum machine_mode)); +extern REAL_VALUE_TYPE ereal_negate PROTO((REAL_VALUE_TYPE)); +extern HOST_WIDE_INT efixi PROTO((REAL_VALUE_TYPE)); +extern unsigned HOST_WIDE_INT efixui PROTO((REAL_VALUE_TYPE)); +extern void ereal_from_int PROTO((REAL_VALUE_TYPE *, + HOST_WIDE_INT, HOST_WIDE_INT)); +extern void ereal_from_uint PROTO((REAL_VALUE_TYPE *, + unsigned HOST_WIDE_INT, + unsigned HOST_WIDE_INT)); +extern void ereal_to_int PROTO((HOST_WIDE_INT *, HOST_WIDE_INT *, + REAL_VALUE_TYPE)); +extern REAL_VALUE_TYPE ereal_ldexp PROTO((REAL_VALUE_TYPE, int)); + +extern void etartdouble PROTO((REAL_VALUE_TYPE, long *)); +extern void etarldouble PROTO((REAL_VALUE_TYPE, long *)); +extern void etardouble PROTO((REAL_VALUE_TYPE, long *)); +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 *)); #define REAL_VALUES_EQUAL(x, y) (ereal_cmp ((x), (y)) == 0) /* true if x < y : */ @@ -404,6 +420,9 @@ do { union real_extract u; \ /* Return a CONST_DOUBLE with value R and mode M. */ #define CONST_DOUBLE_FROM_REAL_VALUE(r, m) immed_real_const_1 (r, m) +extern struct rtx_def *immed_real_const_1 PROTO((REAL_VALUE_TYPE, + enum machine_mode)); + /* Convert a floating point value `r', that can be interpreted as a host machine float or double, to a decimal ASCII string `s' |