Commit e9576d2c by H.J. Lu Committed by Jeff Law

expr.h, real.h: Finish prototyping.

        * expr.h, real.h: Finish prototyping.
Some of hj's prototyping stuff after minor formatting fixes.

From-SVN: r14846
parent e933cbe0
...@@ -3,6 +3,10 @@ Tue Aug 19 09:34:57 1997 Jeffrey A Law (law@cygnus.com) ...@@ -3,6 +3,10 @@ Tue Aug 19 09:34:57 1997 Jeffrey A Law (law@cygnus.com)
* Makefile.in (EXPECT, RUNTEST, RUNTESTFLAGS): Define. * Makefile.in (EXPECT, RUNTEST, RUNTESTFLAGS): Define.
(site.exp, check, check-g++, check-gcc): New targets. (site.exp, check, check-g++, check-gcc): New targets.
Tue Aug 19 07:18:34 1997 H.J. Lu (hjl@gnu.ai.mit.edu)
* expr.h, real.h: Finish prototyping.
Mon Aug 18 17:39:02 1997 Mike Meissner <meissner@cygnus.com> Mon Aug 18 17:39:02 1997 Mike Meissner <meissner@cygnus.com>
* configure.in ({powerpc,rs6000}*-*-*, --with-cpu): Remove single * configure.in ({powerpc,rs6000}*-*-*, --with-cpu): Remove single
......
...@@ -315,7 +315,7 @@ typedef struct optab ...@@ -315,7 +315,7 @@ typedef struct optab
#define GEN_FCN(CODE) (*insn_gen_function[(int) (CODE)]) #define GEN_FCN(CODE) (*insn_gen_function[(int) (CODE)])
#endif #endif
extern rtx (*const insn_gen_function[]) (); extern rtx (*const insn_gen_function[]) PROTO ((rtx, ...));
extern optab add_optab; extern optab add_optab;
extern optab sub_optab; extern optab sub_optab;
...@@ -507,7 +507,7 @@ extern rtx chkr_set_right_libfunc; ...@@ -507,7 +507,7 @@ extern rtx chkr_set_right_libfunc;
extern rtx chkr_copy_bitmap_libfunc; extern rtx chkr_copy_bitmap_libfunc;
extern rtx chkr_check_exec_libfunc; extern rtx chkr_check_exec_libfunc;
typedef rtx (*rtxfun) (); typedef rtx (*rtxfun) PROTO ((rtx));
/* Indexed by the rtx-code for a conditional (eg. EQ, LT,...) /* Indexed by the rtx-code for a conditional (eg. EQ, LT,...)
gives the gen_function to make a branch to test that condition. */ gives the gen_function to make a branch to test that condition. */
...@@ -595,6 +595,7 @@ rtx emit_conditional_move PROTO((rtx, enum rtx_code, rtx, rtx, ...@@ -595,6 +595,7 @@ rtx emit_conditional_move PROTO((rtx, enum rtx_code, rtx, rtx,
/* Return non-zero if the conditional move is supported. */ /* Return non-zero if the conditional move is supported. */
int can_conditionally_move_p PROTO((enum machine_mode mode)); int can_conditionally_move_p PROTO((enum machine_mode mode));
#endif #endif
/* Create but don't emit one rtl instruction to add one rtx into another. /* Create but don't emit one rtl instruction to add one rtx into another.
...@@ -931,7 +932,9 @@ extern rtx assemble_static_space PROTO((int)); ...@@ -931,7 +932,9 @@ extern rtx assemble_static_space PROTO((int));
/* Hook called by expand_expr for language-specific tree codes. /* Hook called by expand_expr for language-specific tree codes.
It is up to the language front end to install a hook It is up to the language front end to install a hook
if it has any such codes that expand_expr needs to know about. */ if it has any such codes that expand_expr needs to know about. */
extern rtx (*lang_expand_expr) (); extern rtx (*lang_expand_expr) PROTO ((union tree_node *, rtx,
enum machine_mode,
enum expand_modifier modifier));
#ifdef TREE_CODE #ifdef TREE_CODE
/* Build bytecode call descriptor for function SUBR. */ /* Build bytecode call descriptor for function SUBR. */
...@@ -942,3 +945,10 @@ extern rtx bc_build_calldesc PROTO((tree)); ...@@ -942,3 +945,10 @@ extern rtx bc_build_calldesc PROTO((tree));
plus the minimal alignment shifted left 8 bits. */ plus the minimal alignment shifted left 8 bits. */
extern tree bc_runtime_type_code PROTO((tree)); extern tree bc_runtime_type_code PROTO((tree));
#endif #endif
extern void init_all_optabs PROTO ((void));
extern void init_mov_optab PROTO ((void));
extern void bc_adjust_stack PROTO ((int));
extern void bc_load_localaddr PROTO ((rtx));
extern void do_jump_by_parts_greater_rtx PROTO ((enum machine_mode, int,
rtx, rtx, rtx, rtx));
...@@ -166,7 +166,8 @@ extern REAL_VALUE_TYPE ereal_from_double PROTO((HOST_WIDE_INT *)); ...@@ -166,7 +166,8 @@ extern REAL_VALUE_TYPE ereal_from_double PROTO((HOST_WIDE_INT *));
/* These return REAL_VALUE_TYPE: */ /* These return REAL_VALUE_TYPE: */
#define REAL_VALUE_RNDZINT(x) (etrunci (x)) #define REAL_VALUE_RNDZINT(x) (etrunci (x))
#define REAL_VALUE_UNSIGNED_RNDZINT(x) (etruncui (x)) #define REAL_VALUE_UNSIGNED_RNDZINT(x) (etruncui (x))
extern REAL_VALUE_TYPE real_value_truncate (); extern REAL_VALUE_TYPE real_value_truncate PROTO ((enum machine_mode,
REAL_VALUE_TYPE));
#define REAL_VALUE_TRUNCATE(mode, x) real_value_truncate (mode, x) #define REAL_VALUE_TRUNCATE(mode, x) real_value_truncate (mode, x)
/* These return HOST_WIDE_INT: */ /* These return HOST_WIDE_INT: */
...@@ -360,7 +361,8 @@ extern double (atof) (); ...@@ -360,7 +361,8 @@ extern double (atof) ();
size and where `float' is SFmode. */ size and where `float' is SFmode. */
/* Don't use REAL_VALUE_TRUNCATE directly--always call real_value_truncate. */ /* Don't use REAL_VALUE_TRUNCATE directly--always call real_value_truncate. */
extern REAL_VALUE_TYPE real_value_truncate (); extern REAL_VALUE_TYPE real_value_truncate PROTO ((enum machine_mode,
REAL_VALUE_TYPE));
#ifndef REAL_VALUE_TRUNCATE #ifndef REAL_VALUE_TRUNCATE
#define REAL_VALUE_TRUNCATE(mode, x) \ #define REAL_VALUE_TRUNCATE(mode, x) \
...@@ -421,11 +423,12 @@ union real_extract ...@@ -421,11 +423,12 @@ union real_extract
or cc0_rtx if it is not on the chain. */ or cc0_rtx if it is not on the chain. */
#define CONST_DOUBLE_MEM(r) XEXP (r, 0) #define CONST_DOUBLE_MEM(r) XEXP (r, 0)
/* Given a CONST_DOUBLE in FROM, store into TO the value it represents. */
/* Function to return a real value (not a tree node) /* Function to return a real value (not a tree node)
from a given integer constant. */ from a given integer constant. */
REAL_VALUE_TYPE real_value_from_int_cst (); union tree_node;
REAL_VALUE_TYPE real_value_from_int_cst PROTO ((union tree_node *,
/* Given a CONST_DOUBLE in FROM, store into TO the value it represents. */ union tree_node *));
#define REAL_VALUE_FROM_CONST_DOUBLE(to, from) \ #define REAL_VALUE_FROM_CONST_DOUBLE(to, from) \
do { union real_extract u; \ do { union real_extract u; \
...@@ -449,4 +452,13 @@ extern struct rtx_def *immed_real_const_1 PROTO((REAL_VALUE_TYPE, ...@@ -449,4 +452,13 @@ extern struct rtx_def *immed_real_const_1 PROTO((REAL_VALUE_TYPE,
/* Replace R by 1/R in the given machine mode, if the result is exact. */ /* 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 PROTO((enum machine_mode, REAL_VALUE_TYPE *));
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 void debug_real PROTO ((REAL_VALUE_TYPE));
/* In varasm.c */
extern void assemble_real PROTO ((REAL_VALUE_TYPE,
enum machine_mode));
#endif /* Not REAL_H_INCLUDED */ #endif /* Not REAL_H_INCLUDED */
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment