1 |
38 |
julius |
/* Definitions of target machine for GNU compiler, for IBM S/390.
|
2 |
|
|
Copyright (C) 2000, 2002, 2003, 2004, 2005, 2007 Free Software Foundation, Inc.
|
3 |
|
|
Contributed by Hartmut Penner (hpenner@de.ibm.com)
|
4 |
|
|
|
5 |
|
|
This file is part of GCC.
|
6 |
|
|
|
7 |
|
|
GCC is free software; you can redistribute it and/or modify it under
|
8 |
|
|
the terms of the GNU General Public License as published by the Free
|
9 |
|
|
Software Foundation; either version 3, or (at your option) any later
|
10 |
|
|
version.
|
11 |
|
|
|
12 |
|
|
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
13 |
|
|
WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
14 |
|
|
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
15 |
|
|
for more details.
|
16 |
|
|
|
17 |
|
|
You should have received a copy of the GNU General Public License
|
18 |
|
|
along with GCC; see the file COPYING3. If not see
|
19 |
|
|
<http://www.gnu.org/licenses/>. */
|
20 |
|
|
|
21 |
|
|
|
22 |
|
|
|
23 |
|
|
/* Prototypes of functions used for constraint evaluation in
|
24 |
|
|
constraints.c. */
|
25 |
|
|
|
26 |
|
|
extern int s390_mem_constraint (const char *str, rtx op);
|
27 |
|
|
extern int s390_O_constraint_str (const char c, HOST_WIDE_INT value);
|
28 |
|
|
extern int s390_N_constraint_str (const char *str, HOST_WIDE_INT value);
|
29 |
|
|
extern int s390_float_const_zero_p (rtx value);
|
30 |
|
|
|
31 |
|
|
|
32 |
|
|
|
33 |
|
|
/* Declare functions in s390.c. */
|
34 |
|
|
|
35 |
|
|
extern void optimization_options (int, int);
|
36 |
|
|
extern void override_options (void);
|
37 |
|
|
extern bool s390_can_eliminate (int, int);
|
38 |
|
|
extern HOST_WIDE_INT s390_initial_elimination_offset (int, int);
|
39 |
|
|
extern void s390_emit_prologue (void);
|
40 |
|
|
extern void s390_emit_epilogue (bool);
|
41 |
|
|
extern void s390_function_profiler (FILE *, int);
|
42 |
|
|
extern void s390_conditional_register_usage (void);
|
43 |
|
|
extern void s390_set_has_landing_pad_p (bool);
|
44 |
|
|
extern bool s390_hard_regno_mode_ok (unsigned int, enum machine_mode);
|
45 |
|
|
extern bool s390_hard_regno_rename_ok (unsigned int, unsigned int);
|
46 |
|
|
extern bool s390_class_max_nregs (enum reg_class, enum machine_mode);
|
47 |
|
|
|
48 |
|
|
#ifdef RTX_CODE
|
49 |
|
|
extern int s390_extra_constraint_str (rtx, int, const char *);
|
50 |
|
|
extern int s390_const_ok_for_constraint_p (HOST_WIDE_INT, int, const char *);
|
51 |
|
|
extern int s390_const_double_ok_for_constraint_p (rtx, int, const char *);
|
52 |
|
|
extern int s390_single_part (rtx, enum machine_mode, enum machine_mode, int);
|
53 |
|
|
extern unsigned HOST_WIDE_INT s390_extract_part (rtx, enum machine_mode, int);
|
54 |
|
|
extern bool s390_split_ok_p (rtx, rtx, enum machine_mode, int);
|
55 |
|
|
extern bool s390_overlap_p (rtx, rtx, HOST_WIDE_INT);
|
56 |
|
|
extern bool s390_offset_p (rtx, rtx, rtx);
|
57 |
|
|
extern int tls_symbolic_operand (rtx);
|
58 |
|
|
|
59 |
|
|
extern bool s390_match_ccmode (rtx, enum machine_mode);
|
60 |
|
|
extern enum machine_mode s390_tm_ccmode (rtx, rtx, bool);
|
61 |
|
|
extern enum machine_mode s390_select_ccmode (enum rtx_code, rtx, rtx);
|
62 |
|
|
extern void s390_canonicalize_comparison (enum rtx_code *, rtx *, rtx *);
|
63 |
|
|
extern rtx s390_emit_compare (enum rtx_code, rtx, rtx);
|
64 |
|
|
extern void s390_emit_jump (rtx, rtx);
|
65 |
|
|
extern bool symbolic_reference_mentioned_p (rtx);
|
66 |
|
|
extern bool tls_symbolic_reference_mentioned_p (rtx);
|
67 |
|
|
extern bool legitimate_la_operand_p (rtx);
|
68 |
|
|
extern bool preferred_la_operand_p (rtx, rtx);
|
69 |
|
|
extern int legitimate_pic_operand_p (rtx);
|
70 |
|
|
extern int legitimate_constant_p (rtx);
|
71 |
|
|
extern bool legitimate_reload_constant_p (rtx);
|
72 |
|
|
extern bool legitimate_address_p (enum machine_mode, rtx, int);
|
73 |
|
|
extern rtx legitimize_pic_address (rtx, rtx);
|
74 |
|
|
extern rtx legitimize_address (rtx, rtx, enum machine_mode);
|
75 |
|
|
extern rtx legitimize_reload_address (rtx, enum machine_mode, int, int);
|
76 |
|
|
extern enum reg_class s390_preferred_reload_class (rtx, enum reg_class);
|
77 |
|
|
extern enum reg_class s390_secondary_input_reload_class (enum reg_class,
|
78 |
|
|
enum machine_mode,
|
79 |
|
|
rtx);
|
80 |
|
|
extern enum reg_class s390_secondary_output_reload_class (enum reg_class,
|
81 |
|
|
enum machine_mode,
|
82 |
|
|
rtx);
|
83 |
|
|
extern void s390_expand_plus_operand (rtx, rtx, rtx);
|
84 |
|
|
extern void emit_symbolic_move (rtx *);
|
85 |
|
|
extern void s390_load_address (rtx, rtx);
|
86 |
|
|
extern void s390_expand_movmem (rtx, rtx, rtx);
|
87 |
|
|
extern void s390_expand_setmem (rtx, rtx, rtx);
|
88 |
|
|
extern void s390_expand_cmpmem (rtx, rtx, rtx, rtx);
|
89 |
|
|
extern bool s390_expand_addcc (enum rtx_code, rtx, rtx, rtx, rtx, rtx);
|
90 |
|
|
extern bool s390_expand_insv (rtx, rtx, rtx, rtx);
|
91 |
|
|
extern void s390_expand_cs_hqi (enum machine_mode, rtx, rtx, rtx, rtx);
|
92 |
|
|
extern void s390_expand_atomic (enum machine_mode, enum rtx_code,
|
93 |
|
|
rtx, rtx, rtx, bool);
|
94 |
|
|
extern rtx s390_return_addr_rtx (int, rtx);
|
95 |
|
|
extern rtx s390_back_chain_rtx (void);
|
96 |
|
|
extern rtx s390_emit_call (rtx, rtx, rtx, rtx);
|
97 |
|
|
extern void s390_expand_logical_operator (enum rtx_code,
|
98 |
|
|
enum machine_mode, rtx *);
|
99 |
|
|
extern bool s390_logical_operator_ok_p (rtx *);
|
100 |
|
|
extern void s390_narrow_logical_operator (enum rtx_code, rtx *, rtx *);
|
101 |
|
|
extern void s390_split_access_reg (rtx, rtx *, rtx *);
|
102 |
|
|
|
103 |
|
|
extern bool s390_output_addr_const_extra (FILE*, rtx);
|
104 |
|
|
extern void print_operand_address (FILE *, rtx);
|
105 |
|
|
extern void print_operand (FILE *, rtx, int);
|
106 |
|
|
extern void s390_output_pool_entry (rtx, enum machine_mode, unsigned int);
|
107 |
|
|
extern void s390_trampoline_template (FILE *);
|
108 |
|
|
extern void s390_initialize_trampoline (rtx, rtx, rtx);
|
109 |
|
|
extern rtx s390_gen_rtx_const_DI (int, int);
|
110 |
|
|
extern int s390_agen_dep_p (rtx, rtx);
|
111 |
|
|
extern rtx s390_load_got (void);
|
112 |
|
|
extern rtx s390_get_thread_pointer (void);
|
113 |
|
|
extern void s390_emit_tpf_eh_return (rtx);
|
114 |
|
|
extern bool s390_legitimate_address_without_index_p (rtx);
|
115 |
|
|
extern bool s390_decompose_shift_count (rtx, rtx *, HOST_WIDE_INT *);
|
116 |
|
|
extern int s390_branch_condition_mask (rtx);
|
117 |
|
|
|
118 |
|
|
#endif /* RTX_CODE */
|
119 |
|
|
|
120 |
|
|
#ifdef TREE_CODE
|
121 |
|
|
extern void s390_function_arg_advance (CUMULATIVE_ARGS *, enum machine_mode,
|
122 |
|
|
tree, int);
|
123 |
|
|
#ifdef RTX_CODE
|
124 |
|
|
extern rtx s390_function_arg (CUMULATIVE_ARGS *, enum machine_mode, tree, int);
|
125 |
|
|
extern rtx s390_function_value (tree, enum machine_mode);
|
126 |
|
|
extern void s390_va_start (tree, rtx);
|
127 |
|
|
#endif /* RTX_CODE */
|
128 |
|
|
#endif /* TREE_CODE */
|