diff options
Diffstat (limited to 'gcc/real.h')
| -rwxr-xr-x | gcc/real.h | 86 |
1 files changed, 43 insertions, 43 deletions
@@ -66,7 +66,7 @@ Boston, MA 02111-1307, USA. */ #define REAL_VALUE_TYPE double -extern int significand_size PROTO((enum machine_mode)); +extern int significand_size (enum machine_mode); /* If emulation has been enabled by defining REAL_ARITHMETIC or by setting LONG_DOUBLE_TYPE_SIZE to 96 or 128, then define macros so that @@ -78,36 +78,36 @@ extern int significand_size PROTO((enum machine_mode)); earith (&(value), (code), &(d1), &(d2)) /* 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 *, +extern void earith (REAL_VALUE_TYPE *, int, + REAL_VALUE_TYPE *, REAL_VALUE_TYPE *); +extern REAL_VALUE_TYPE etrunci (REAL_VALUE_TYPE); +extern REAL_VALUE_TYPE etruncui (REAL_VALUE_TYPE); +extern REAL_VALUE_TYPE ereal_atof (char *, enum machine_mode); +extern REAL_VALUE_TYPE ereal_negate (REAL_VALUE_TYPE); +extern HOST_WIDE_INT efixi (REAL_VALUE_TYPE); +extern unsigned HOST_WIDE_INT efixui (REAL_VALUE_TYPE); +extern void ereal_from_int (REAL_VALUE_TYPE *, HOST_WIDE_INT, HOST_WIDE_INT, - enum machine_mode)); -extern void ereal_from_uint PROTO((REAL_VALUE_TYPE *, + enum machine_mode); +extern void ereal_from_uint (REAL_VALUE_TYPE *, unsigned HOST_WIDE_INT, unsigned HOST_WIDE_INT, - enum machine_mode)); -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_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 *)); + enum machine_mode); +extern void ereal_to_int (HOST_WIDE_INT *, HOST_WIDE_INT *, + REAL_VALUE_TYPE); +extern REAL_VALUE_TYPE ereal_ldexp (REAL_VALUE_TYPE, int); + +extern void etartdouble (REAL_VALUE_TYPE, long *); +extern void etarldouble (REAL_VALUE_TYPE, long *); +extern void etardouble (REAL_VALUE_TYPE, long *); +extern long etarsingle (REAL_VALUE_TYPE); +extern void ereal_to_decimal (REAL_VALUE_TYPE, char *); +extern int ereal_cmp (REAL_VALUE_TYPE, REAL_VALUE_TYPE); +extern int ereal_isneg (REAL_VALUE_TYPE); +extern REAL_VALUE_TYPE ereal_unto_float (long); +extern REAL_VALUE_TYPE ereal_unto_double (long *); +extern REAL_VALUE_TYPE ereal_from_float (HOST_WIDE_INT); +extern REAL_VALUE_TYPE ereal_from_double (HOST_WIDE_INT *); #define REAL_VALUES_EQUAL(x, y) (ereal_cmp ((x), (y)) == 0) /* true if x < y : */ @@ -117,8 +117,8 @@ extern REAL_VALUE_TYPE ereal_from_double PROTO((HOST_WIDE_INT *)); /* These return REAL_VALUE_TYPE: */ #define REAL_VALUE_RNDZINT(x) (etrunci (x)) #define REAL_VALUE_UNSIGNED_RNDZINT(x) (etruncui (x)) -extern REAL_VALUE_TYPE real_value_truncate PROTO ((enum machine_mode, - REAL_VALUE_TYPE)); +extern REAL_VALUE_TYPE real_value_truncate (enum machine_mode, + REAL_VALUE_TYPE); #define REAL_VALUE_TRUNCATE(mode, x) real_value_truncate (mode, x) /* These return HOST_WIDE_INT: */ @@ -268,7 +268,7 @@ REAL_VALUE_TYPE ereal_atof (); /* Hexadecimal floating constant input for use with host computer's fp arithmetic. */ #ifndef REAL_VALUE_HTOF -extern REAL_VALUE_TYPE real_hex_to_f PROTO((char *, enum machine_mode)); +extern REAL_VALUE_TYPE real_hex_to_f (char *, enum machine_mode); #define REAL_VALUE_HTOF(s,m) real_hex_to_f(s,m) #endif @@ -282,7 +282,7 @@ extern REAL_VALUE_TYPE real_hex_to_f PROTO((char *, enum machine_mode)); size and where `float' is SFmode. */ /* Don't use REAL_VALUE_TRUNCATE directly--always call real_value_truncate. */ -extern REAL_VALUE_TYPE real_value_truncate PROTO((enum machine_mode, REAL_VALUE_TYPE)); +extern REAL_VALUE_TYPE real_value_truncate (enum machine_mode, REAL_VALUE_TYPE); #ifndef REAL_VALUE_TRUNCATE #define REAL_VALUE_TRUNCATE(mode, x) \ @@ -305,9 +305,9 @@ extern REAL_VALUE_TYPE real_value_truncate PROTO((enum machine_mode, REAL_VALUE_ #define REAL_VALUE_NEGATIVE(x) (target_negative (x)) #endif -extern int target_isnan PROTO ((REAL_VALUE_TYPE)); -extern int target_isinf PROTO ((REAL_VALUE_TYPE)); -extern int target_negative PROTO ((REAL_VALUE_TYPE)); +extern int target_isnan (REAL_VALUE_TYPE); +extern int target_isinf (REAL_VALUE_TYPE); +extern int target_negative (REAL_VALUE_TYPE); /* Determine whether a floating-point value X is minus 0. */ #ifndef REAL_VALUE_MINUS_ZERO @@ -351,8 +351,8 @@ union real_extract /* Function to return a real value (not a tree node) from a given integer constant. */ union tree_node; -REAL_VALUE_TYPE real_value_from_int_cst PROTO ((union tree_node *, - union tree_node *)); +REAL_VALUE_TYPE real_value_from_int_cst (union tree_node *, + union tree_node *); #define REAL_VALUE_FROM_CONST_DOUBLE(to, from) \ do { union real_extract u; \ @@ -362,8 +362,8 @@ 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)); +extern struct rtx_def *immed_real_const_1 (REAL_VALUE_TYPE, + enum machine_mode); /* Convert a floating point value `r', that can be interpreted @@ -374,11 +374,11 @@ extern struct rtx_def *immed_real_const_1 PROTO((REAL_VALUE_TYPE, #endif /* Replace R by 1/R in the given machine mode, if the result is exact. */ -extern int exact_real_inverse PROTO((enum machine_mode, REAL_VALUE_TYPE *)); +extern int exact_real_inverse (enum machine_mode, REAL_VALUE_TYPE *); -extern void debug_real PROTO ((REAL_VALUE_TYPE)); +extern void debug_real (REAL_VALUE_TYPE); /* In varasm.c */ -extern void assemble_real PROTO ((REAL_VALUE_TYPE, - enum machine_mode)); +extern void assemble_real (REAL_VALUE_TYPE, + enum machine_mode); #endif /* Not REAL_H_INCLUDED */ |