]>
Commit | Line | Data |
---|---|---|
1acadd8b | 1 | /* Language-specific hook definitions for C front end. |
0b387d23 | 2 | Copyright (C) 1991, 1995, 1997, 1998, |
5e6015b1 | 3 | 1999, 2000, 2001 Free Software Foundation, Inc. |
1acadd8b | 4 | |
f12b58b3 | 5 | This file is part of GCC. |
1acadd8b | 6 | |
f12b58b3 | 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 2, or (at your option) any later | |
10 | version. | |
1acadd8b | 11 | |
f12b58b3 | 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. | |
1acadd8b | 16 | |
17 | You should have received a copy of the GNU General Public License | |
f12b58b3 | 18 | along with GCC; see the file COPYING. If not, write to the Free |
19 | Software Foundation, 59 Temple Place - Suite 330, Boston, MA | |
20 | 02111-1307, USA. */ | |
1acadd8b | 21 | |
22 | ||
23 | #include "config.h" | |
405711de | 24 | #include "system.h" |
1acadd8b | 25 | #include "tree.h" |
e41f0d80 | 26 | #include "c-tree.h" |
b78207a0 | 27 | #include "c-common.h" |
1f3233d1 | 28 | #include "ggc.h" |
e8602e56 | 29 | #include "langhooks.h" |
b0278d39 | 30 | #include "langhooks-def.h" |
811c1b69 | 31 | |
9ceb1c29 | 32 | static const char *c_init PARAMS ((const char *)); |
e486a835 | 33 | static void c_init_options PARAMS ((void)); |
78c551ad | 34 | |
35 | /* ### When changing hooks, consider if ObjC needs changing too!! ### */ | |
50c7fc99 | 36 | |
d19bd1f0 | 37 | #undef LANG_HOOKS_NAME |
38 | #define LANG_HOOKS_NAME "GNU C" | |
e8602e56 | 39 | #undef LANG_HOOKS_INIT |
40 | #define LANG_HOOKS_INIT c_init | |
cdc9fa3e | 41 | #undef LANG_HOOKS_FINISH |
42 | #define LANG_HOOKS_FINISH c_common_finish | |
e8602e56 | 43 | #undef LANG_HOOKS_INIT_OPTIONS |
44 | #define LANG_HOOKS_INIT_OPTIONS c_init_options | |
45 | #undef LANG_HOOKS_DECODE_OPTION | |
46 | #define LANG_HOOKS_DECODE_OPTION c_decode_option | |
47 | #undef LANG_HOOKS_POST_OPTIONS | |
dd436eaf | 48 | #define LANG_HOOKS_POST_OPTIONS c_common_post_options |
2a631e19 | 49 | #undef LANG_HOOKS_GET_ALIAS_SET |
50 | #define LANG_HOOKS_GET_ALIAS_SET c_common_get_alias_set | |
b3187c7c | 51 | #undef LANG_HOOKS_SAFE_FROM_P |
52 | #define LANG_HOOKS_SAFE_FROM_P c_safe_from_p | |
b467ecc1 | 53 | #undef LANG_HOOKS_EXPAND_EXPR |
54 | #define LANG_HOOKS_EXPAND_EXPR c_expand_expr | |
9b86eec0 | 55 | #undef LANG_HOOKS_MARK_ADDRESSABLE |
56 | #define LANG_HOOKS_MARK_ADDRESSABLE c_mark_addressable | |
b78207a0 | 57 | #undef LANG_HOOKS_PARSE_FILE |
58 | #define LANG_HOOKS_PARSE_FILE c_common_parse_file | |
aff9e656 | 59 | #undef LANG_HOOKS_TRUTHVALUE_CONVERSION |
60 | #define LANG_HOOKS_TRUTHVALUE_CONVERSION c_common_truthvalue_conversion | |
26ca6c20 | 61 | #undef LANG_HOOKS_INSERT_DEFAULT_ATTRIBUTES |
62 | #define LANG_HOOKS_INSERT_DEFAULT_ATTRIBUTES c_insert_default_attributes | |
ee23fd7b | 63 | #undef LANG_HOOKS_FINISH_INCOMPLETE_DECL |
64 | #define LANG_HOOKS_FINISH_INCOMPLETE_DECL c_finish_incomplete_decl | |
65 | #undef LANG_HOOKS_UNSAFE_FOR_REEVAL | |
66 | #define LANG_HOOKS_UNSAFE_FOR_REEVAL c_common_unsafe_for_reeval | |
ec11e38e | 67 | #undef LANG_HOOKS_STATICP |
68 | #define LANG_HOOKS_STATICP c_staticp | |
8d58a5a7 | 69 | #undef LANG_HOOKS_WARN_UNUSED_GLOBAL_DECL |
70 | #define LANG_HOOKS_WARN_UNUSED_GLOBAL_DECL c_warn_unused_global_decl | |
b7fced5e | 71 | #undef LANG_HOOKS_PRINT_IDENTIFIER |
72 | #define LANG_HOOKS_PRINT_IDENTIFIER c_print_identifier | |
c80c4f22 | 73 | #undef LANG_HOOKS_FUNCTION_ENTER_NESTED |
74 | #define LANG_HOOKS_FUNCTION_ENTER_NESTED c_push_function_context | |
75 | #undef LANG_HOOKS_FUNCTION_LEAVE_NESTED | |
76 | #define LANG_HOOKS_FUNCTION_LEAVE_NESTED c_pop_function_context | |
dbc42b78 | 77 | #undef LANG_HOOKS_DUP_LANG_SPECIFIC_DECL |
78 | #define LANG_HOOKS_DUP_LANG_SPECIFIC_DECL c_dup_lang_specific_decl | |
2a631e19 | 79 | |
f8e93a2e | 80 | /* Attribute hooks. */ |
81 | #undef LANG_HOOKS_COMMON_ATTRIBUTE_TABLE | |
82 | #define LANG_HOOKS_COMMON_ATTRIBUTE_TABLE c_common_attribute_table | |
83 | #undef LANG_HOOKS_FORMAT_ATTRIBUTE_TABLE | |
84 | #define LANG_HOOKS_FORMAT_ATTRIBUTE_TABLE c_common_format_attribute_table | |
85 | ||
e8602e56 | 86 | #undef LANG_HOOKS_TREE_INLINING_CANNOT_INLINE_TREE_FN |
87 | #define LANG_HOOKS_TREE_INLINING_CANNOT_INLINE_TREE_FN \ | |
88 | c_cannot_inline_tree_fn | |
89 | #undef LANG_HOOKS_TREE_INLINING_DISREGARD_INLINE_LIMITS | |
90 | #define LANG_HOOKS_TREE_INLINING_DISREGARD_INLINE_LIMITS \ | |
91 | c_disregard_inline_limits | |
92 | #undef LANG_HOOKS_TREE_INLINING_ANON_AGGR_TYPE_P | |
93 | #define LANG_HOOKS_TREE_INLINING_ANON_AGGR_TYPE_P \ | |
94 | anon_aggr_type_p | |
78b80426 | 95 | #undef LANG_HOOKS_TREE_INLINING_CONVERT_PARM_FOR_INLINING |
96 | #define LANG_HOOKS_TREE_INLINING_CONVERT_PARM_FOR_INLINING \ | |
97 | c_convert_parm_for_inlining | |
e8602e56 | 98 | |
771d21fa | 99 | #undef LANG_HOOKS_TYPE_FOR_MODE |
100 | #define LANG_HOOKS_TYPE_FOR_MODE c_common_type_for_mode | |
101 | #undef LANG_HOOKS_TYPE_FOR_SIZE | |
102 | #define LANG_HOOKS_TYPE_FOR_SIZE c_common_type_for_size | |
4070745f | 103 | #undef LANG_HOOKS_SIGNED_TYPE |
104 | #define LANG_HOOKS_SIGNED_TYPE c_common_signed_type | |
105 | #undef LANG_HOOKS_UNSIGNED_TYPE | |
106 | #define LANG_HOOKS_UNSIGNED_TYPE c_common_unsigned_type | |
107 | #undef LANG_HOOKS_SIGNED_OR_UNSIGNED_TYPE | |
108 | #define LANG_HOOKS_SIGNED_OR_UNSIGNED_TYPE c_common_signed_or_unsigned_type | |
1dd25100 | 109 | #undef LANG_HOOKS_INCOMPLETE_TYPE_ERROR |
110 | #define LANG_HOOKS_INCOMPLETE_TYPE_ERROR c_incomplete_type_error | |
63c62881 | 111 | #undef LANG_HOOKS_TYPE_PROMOTES_TO |
112 | #define LANG_HOOKS_TYPE_PROMOTES_TO c_type_promotes_to | |
771d21fa | 113 | |
78c551ad | 114 | /* ### When changing hooks, consider if ObjC needs changing too!! ### */ |
115 | ||
50c7fc99 | 116 | /* Each front end provides its own. */ |
d19bd1f0 | 117 | const struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER; |
50c7fc99 | 118 | |
ab1a776d | 119 | /* Tree code classes. */ |
120 | ||
121 | #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) TYPE, | |
122 | ||
123 | const char tree_code_type[] = { | |
124 | #include "tree.def" | |
125 | 'x', | |
126 | #include "c-common.def" | |
127 | }; | |
128 | #undef DEFTREECODE | |
129 | ||
130 | /* Table indexed by tree code giving number of expression | |
131 | operands beyond the fixed part of the node structure. | |
132 | Not used for types or decls. */ | |
133 | ||
134 | #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) LENGTH, | |
135 | ||
136 | const unsigned char tree_code_length[] = { | |
137 | #include "tree.def" | |
138 | 0, | |
139 | #include "c-common.def" | |
140 | }; | |
141 | #undef DEFTREECODE | |
142 | ||
143 | /* Names of tree components. | |
144 | Used for printing out the tree and error messages. */ | |
145 | #define DEFTREECODE(SYM, NAME, TYPE, LEN) NAME, | |
146 | ||
147 | const char *const tree_code_name[] = { | |
148 | #include "tree.def" | |
149 | "@@dummy", | |
150 | #include "c-common.def" | |
151 | }; | |
152 | #undef DEFTREECODE | |
153 | ||
e486a835 | 154 | static void |
155 | c_init_options () | |
7e87204a | 156 | { |
435fb09b | 157 | c_common_init_options (clk_c); |
7e87204a | 158 | } |
159 | ||
9ceb1c29 | 160 | static const char * |
161 | c_init (filename) | |
162 | const char *filename; | |
1acadd8b | 163 | { |
4cfbaf39 | 164 | return c_objc_common_init (filename); |
1acadd8b | 165 | } |
166 | ||
1acadd8b | 167 | /* Used by c-lex.c, but only for objc. */ |
6c493ce1 | 168 | |
1acadd8b | 169 | tree |
170 | lookup_interface (arg) | |
cd03a192 | 171 | tree arg ATTRIBUTE_UNUSED; |
1acadd8b | 172 | { |
173 | return 0; | |
174 | } | |
175 | ||
6c493ce1 | 176 | tree |
177 | is_class_name (arg) | |
cd03a192 | 178 | tree arg ATTRIBUTE_UNUSED; |
6c493ce1 | 179 | { |
180 | return 0; | |
181 | } | |
182 | ||
1acadd8b | 183 | void |
184 | maybe_objc_check_decl (decl) | |
cd03a192 | 185 | tree decl ATTRIBUTE_UNUSED; |
1acadd8b | 186 | { |
187 | } | |
188 | ||
189 | int | |
6c493ce1 | 190 | maybe_objc_comptypes (lhs, rhs, reflexive) |
cd03a192 | 191 | tree lhs ATTRIBUTE_UNUSED; |
192 | tree rhs ATTRIBUTE_UNUSED; | |
193 | int reflexive ATTRIBUTE_UNUSED; | |
6c493ce1 | 194 | { |
dec2f975 | 195 | return -1; |
6c493ce1 | 196 | } |
197 | ||
1acadd8b | 198 | tree |
199 | maybe_building_objc_message_expr () | |
200 | { | |
201 | return 0; | |
202 | } | |
203 | ||
204 | int | |
205 | recognize_objc_keyword () | |
206 | { | |
207 | return 0; | |
208 | } | |
209 | ||
1beb61f9 | 210 | /* Used by c-typeck.c (build_external_ref), but only for objc. */ |
211 | ||
212 | tree | |
213 | lookup_objc_ivar (id) | |
214 | tree id ATTRIBUTE_UNUSED; | |
215 | { | |
216 | return 0; | |
217 | } | |
218 | ||
aa5ec236 | 219 | void |
220 | finish_file () | |
221 | { | |
4cfbaf39 | 222 | c_objc_common_finish_file (); |
aa5ec236 | 223 | } |
1f3233d1 | 224 | |
225 | #include "gtype-c.h" |