1 /* Default macros to initialize the lang_hooks data structure.
2 Copyright 2001, 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
3 Contributed by Alexandre Oliva <aoliva@redhat.com>
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 GCC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING. If not, write to
19 the Free Software Foundation, 51 Franklin Street, Fifth Floor,
20 Boston, MA 02110-1301, USA. */
22 #ifndef GCC_LANG_HOOKS_DEF_H
23 #define GCC_LANG_HOOKS_DEF_H
27 struct diagnostic_context;
29 /* Provide a hook routine for alias sets that always returns 1. This is
30 used by languages that haven't deal with alias sets yet. */
31 extern HOST_WIDE_INT hook_get_alias_set_0 (tree);
33 /* Note to creators of new hooks:
35 The macros in this file should NOT be surrounded by a
36 #ifdef...#endif pair, since this file declares the defaults. Each
37 front end overrides any hooks it wishes to, in the file containing
38 its struct lang_hooks, AFTER including this file. */
40 /* See langhooks.h for the definition and documentation of each hook. */
42 extern void lhd_do_nothing (void);
43 extern void lhd_do_nothing_t (tree);
44 extern void lhd_do_nothing_i (int);
45 extern void lhd_do_nothing_f (struct function *);
46 extern bool lhd_post_options (const char **);
47 extern HOST_WIDE_INT lhd_get_alias_set (tree);
48 extern tree lhd_return_tree (tree);
49 extern tree lhd_return_null_tree_v (void);
50 extern tree lhd_return_null_tree (tree);
51 extern tree lhd_do_nothing_iii_return_null_tree (int, int, int);
52 extern int lhd_safe_from_p (rtx, tree);
53 extern tree lhd_staticp (tree);
54 extern void lhd_print_tree_nothing (FILE *, tree, int);
55 extern const char *lhd_decl_printable_name (tree, int);
56 extern const char *lhd_dwarf_name (tree, int);
57 extern int lhd_types_compatible_p (tree, tree);
58 extern rtx lhd_expand_expr (tree, rtx, enum machine_mode, int, rtx *);
59 extern int lhd_expand_decl (tree);
60 extern void lhd_print_error_function (struct diagnostic_context *,
62 extern void lhd_set_decl_assembler_name (tree);
63 extern bool lhd_can_use_bit_fields_p (void);
64 extern bool lhd_warn_unused_global_decl (tree);
65 extern void lhd_incomplete_type_error (tree, tree);
66 extern tree lhd_type_promotes_to (tree);
67 extern void lhd_register_builtin_type (tree, const char *);
68 extern bool lhd_decl_ok_for_sibcall (tree);
69 extern const char *lhd_comdat_group (tree);
70 extern tree lhd_expr_size (tree);
71 extern size_t lhd_tree_size (enum tree_code);
72 extern HOST_WIDE_INT lhd_to_target_charset (HOST_WIDE_INT);
73 extern tree lhd_expr_to_decl (tree, bool *, bool *, bool *);
75 /* Declarations of default tree inlining hooks. */
76 extern tree lhd_tree_inlining_walk_subtrees (tree *, int *, walk_tree_fn,
77 void *, struct pointer_set_t*);
78 extern int lhd_tree_inlining_cannot_inline_tree_fn (tree *);
79 extern int lhd_tree_inlining_disregard_inline_limits (tree);
80 extern tree lhd_tree_inlining_add_pending_fn_decls (void *, tree);
81 extern int lhd_tree_inlining_auto_var_in_fn_p (tree, tree);
82 extern int lhd_tree_inlining_anon_aggr_type_p (tree);
83 extern int lhd_tree_inlining_start_inlining (tree);
84 extern void lhd_tree_inlining_end_inlining (tree);
85 extern tree lhd_tree_inlining_convert_parm_for_inlining (tree, tree, tree, int);
86 extern void lhd_initialize_diagnostics (struct diagnostic_context *);
87 extern tree lhd_callgraph_analyze_expr (tree *, int *, tree);
90 /* Declarations for tree gimplification hooks. */
91 extern int lhd_gimplify_expr (tree *, tree *, tree *);
92 extern enum omp_clause_default_kind lhd_omp_predetermined_sharing (tree);
93 extern tree lhd_omp_assignment (tree, tree, tree);
94 struct gimplify_omp_ctx;
95 extern void lhd_omp_firstprivatize_type_sizes (struct gimplify_omp_ctx *,
98 /* APPLE LOCAL begin 6353006 */
99 extern tree lhd_build_generic_block_struct_type (void);
100 /* APPLE LOCAL end 6353006 */
102 /* APPLE LOCAL radar 6386976 */
103 extern bool lhd_is_runtime_specific_type (tree);
105 #define LANG_HOOKS_NAME "GNU unknown"
106 #define LANG_HOOKS_IDENTIFIER_SIZE sizeof (struct lang_identifier)
107 #define LANG_HOOKS_INIT hook_bool_void_false
108 #define LANG_HOOKS_FINISH lhd_do_nothing
109 #define LANG_HOOKS_PARSE_FILE lhd_do_nothing_i
110 #define LANG_HOOKS_CLEAR_BINDING_STACK lhd_do_nothing
111 #define LANG_HOOKS_INIT_OPTIONS hook_uint_uint_constcharptrptr_0
112 #define LANG_HOOKS_INITIALIZE_DIAGNOSTICS lhd_initialize_diagnostics
113 #define LANG_HOOKS_HANDLE_OPTION hook_int_size_t_constcharptr_int_0
114 #define LANG_HOOKS_MISSING_ARGUMENT hook_bool_constcharptr_size_t_false
115 #define LANG_HOOKS_POST_OPTIONS lhd_post_options
116 #define LANG_HOOKS_GET_ALIAS_SET lhd_get_alias_set
117 #define LANG_HOOKS_EXPAND_CONSTANT lhd_return_tree
118 #define LANG_HOOKS_EXPAND_EXPR lhd_expand_expr
119 #define LANG_HOOKS_EXPAND_DECL lhd_expand_decl
120 #define LANG_HOOKS_SAFE_FROM_P lhd_safe_from_p
121 #define LANG_HOOKS_FINISH_INCOMPLETE_DECL lhd_do_nothing_t
122 #define LANG_HOOKS_STATICP lhd_staticp
123 #define LANG_HOOKS_DUP_LANG_SPECIFIC_DECL lhd_do_nothing_t
124 #define LANG_HOOKS_SET_DECL_ASSEMBLER_NAME lhd_set_decl_assembler_name
125 #define LANG_HOOKS_CAN_USE_BIT_FIELDS_P lhd_can_use_bit_fields_p
126 #define LANG_HOOKS_REDUCE_BIT_FIELD_OPERATIONS false
127 #define LANG_HOOKS_NO_BODY_BLOCKS false
128 #define LANG_HOOKS_PRINT_STATISTICS lhd_do_nothing
129 #define LANG_HOOKS_PRINT_XNODE lhd_print_tree_nothing
130 #define LANG_HOOKS_PRINT_DECL lhd_print_tree_nothing
131 #define LANG_HOOKS_PRINT_TYPE lhd_print_tree_nothing
132 #define LANG_HOOKS_PRINT_IDENTIFIER lhd_print_tree_nothing
133 #define LANG_HOOKS_PRINT_ERROR_FUNCTION lhd_print_error_function
134 #define LANG_HOOKS_DECL_PRINTABLE_NAME lhd_decl_printable_name
135 #define LANG_HOOKS_DWARF_NAME lhd_dwarf_name
136 #define LANG_HOOKS_GET_CALLEE_FNDECL lhd_return_null_tree
137 #define LANG_HOOKS_EXPR_SIZE lhd_expr_size
138 #define LANG_HOOKS_TREE_SIZE lhd_tree_size
139 #define LANG_HOOKS_TYPES_COMPATIBLE_P lhd_types_compatible_p
140 #define LANG_HOOKS_BUILTIN_FUNCTION builtin_function
141 #define LANG_HOOKS_EXPR_TO_DECL lhd_expr_to_decl
142 #define LANG_HOOKS_TO_TARGET_CHARSET lhd_to_target_charset
143 #define LANG_HOOKS_INIT_TS lhd_do_nothing
145 #define LANG_HOOKS_FUNCTION_INIT lhd_do_nothing_f
146 #define LANG_HOOKS_FUNCTION_FINAL lhd_do_nothing_f
147 #define LANG_HOOKS_FUNCTION_ENTER_NESTED lhd_do_nothing_f
148 #define LANG_HOOKS_FUNCTION_LEAVE_NESTED lhd_do_nothing_f
149 #define LANG_HOOKS_FUNCTION_MISSING_NORETURN_OK_P hook_bool_tree_true
151 /* APPLE LOCAL begin radar 6353006 */
152 #define LANG_HOOKS_BUILD_GENERIC_BLOCK_STRUCT_TYPE \
153 lhd_build_generic_block_struct_type
154 /* APPLE LOCAL end radar 6353006 */
156 /* Attribute hooks. */
157 #define LANG_HOOKS_ATTRIBUTE_TABLE NULL
158 #define LANG_HOOKS_COMMON_ATTRIBUTE_TABLE NULL
159 #define LANG_HOOKS_FORMAT_ATTRIBUTE_TABLE NULL
161 /* Tree inlining hooks. */
162 #define LANG_HOOKS_TREE_INLINING_WALK_SUBTREES lhd_tree_inlining_walk_subtrees
163 #define LANG_HOOKS_TREE_INLINING_CANNOT_INLINE_TREE_FN \
164 lhd_tree_inlining_cannot_inline_tree_fn
165 #define LANG_HOOKS_TREE_INLINING_DISREGARD_INLINE_LIMITS \
166 lhd_tree_inlining_disregard_inline_limits
167 #define LANG_HOOKS_TREE_INLINING_ADD_PENDING_FN_DECLS \
168 lhd_tree_inlining_add_pending_fn_decls
169 #define LANG_HOOKS_TREE_INLINING_AUTO_VAR_IN_FN_P \
170 lhd_tree_inlining_auto_var_in_fn_p
171 #define LANG_HOOKS_TREE_INLINING_ANON_AGGR_TYPE_P \
172 lhd_tree_inlining_anon_aggr_type_p
173 #define LANG_HOOKS_TREE_INLINING_VAR_MOD_TYPE_P \
174 hook_bool_tree_tree_false
175 #define LANG_HOOKS_TREE_INLINING_START_INLINING \
176 lhd_tree_inlining_start_inlining
177 #define LANG_HOOKS_TREE_INLINING_END_INLINING \
178 lhd_tree_inlining_end_inlining
179 #define LANG_HOOKS_TREE_INLINING_CONVERT_PARM_FOR_INLINING \
180 lhd_tree_inlining_convert_parm_for_inlining
182 #define LANG_HOOKS_TREE_INLINING_INITIALIZER { \
183 LANG_HOOKS_TREE_INLINING_WALK_SUBTREES, \
184 LANG_HOOKS_TREE_INLINING_CANNOT_INLINE_TREE_FN, \
185 LANG_HOOKS_TREE_INLINING_DISREGARD_INLINE_LIMITS, \
186 LANG_HOOKS_TREE_INLINING_ADD_PENDING_FN_DECLS, \
187 LANG_HOOKS_TREE_INLINING_AUTO_VAR_IN_FN_P, \
188 LANG_HOOKS_TREE_INLINING_ANON_AGGR_TYPE_P, \
189 LANG_HOOKS_TREE_INLINING_VAR_MOD_TYPE_P, \
190 LANG_HOOKS_TREE_INLINING_START_INLINING, \
191 LANG_HOOKS_TREE_INLINING_END_INLINING, \
192 LANG_HOOKS_TREE_INLINING_CONVERT_PARM_FOR_INLINING \
195 #define LANG_HOOKS_CALLGRAPH_ANALYZE_EXPR lhd_callgraph_analyze_expr
196 #define LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION NULL
198 #define LANG_HOOKS_CALLGRAPH_INITIALIZER { \
199 LANG_HOOKS_CALLGRAPH_ANALYZE_EXPR, \
200 LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION, \
203 #define LANG_HOOKS_FUNCTION_INITIALIZER { \
204 LANG_HOOKS_FUNCTION_INIT, \
205 LANG_HOOKS_FUNCTION_FINAL, \
206 LANG_HOOKS_FUNCTION_ENTER_NESTED, \
207 LANG_HOOKS_FUNCTION_LEAVE_NESTED, \
208 LANG_HOOKS_FUNCTION_MISSING_NORETURN_OK_P \
211 /* Hooks for tree gimplification. */
212 #define LANG_HOOKS_GIMPLIFY_EXPR lhd_gimplify_expr
213 #define LANG_HOOKS_FOLD_OBJ_TYPE_REF NULL
215 /* Tree dump hooks. */
216 extern bool lhd_tree_dump_dump_tree (void *, tree);
217 extern int lhd_tree_dump_type_quals (tree);
218 extern tree lhd_make_node (enum tree_code);
220 #define LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN lhd_tree_dump_dump_tree
221 #define LANG_HOOKS_TREE_DUMP_TYPE_QUALS_FN lhd_tree_dump_type_quals
223 #define LANG_HOOKS_TREE_DUMP_INITIALIZER { \
224 LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN, \
225 LANG_HOOKS_TREE_DUMP_TYPE_QUALS_FN \
228 /* Types hooks. There are no reasonable defaults for most of them,
229 so we create a compile-time error instead. */
230 #define LANG_HOOKS_MAKE_TYPE lhd_make_node
231 #define LANG_HOOKS_INCOMPLETE_TYPE_ERROR lhd_incomplete_type_error
232 #define LANG_HOOKS_GENERIC_TYPE_P hook_bool_tree_false
233 #define LANG_HOOKS_TYPE_PROMOTES_TO lhd_type_promotes_to
234 #define LANG_HOOKS_REGISTER_BUILTIN_TYPE lhd_register_builtin_type
235 #define LANG_HOOKS_TYPE_MAX_SIZE lhd_return_null_tree
236 #define LANG_HOOKS_OMP_FIRSTPRIVATIZE_TYPE_SIZES \
237 lhd_omp_firstprivatize_type_sizes
238 /* APPLE LOCAL radar 6386976 */
239 #define LANG_HOOKS_IS_RUNTIME_SPECIFIC_TYPE lhd_is_runtime_specific_type
240 #define LANG_HOOKS_HASH_TYPES true
242 #define LANG_HOOKS_FOR_TYPES_INITIALIZER { \
243 LANG_HOOKS_MAKE_TYPE, \
244 LANG_HOOKS_TYPE_FOR_MODE, \
245 LANG_HOOKS_TYPE_FOR_SIZE, \
246 LANG_HOOKS_UNSIGNED_TYPE, \
247 LANG_HOOKS_SIGNED_TYPE, \
248 LANG_HOOKS_SIGNED_OR_UNSIGNED_TYPE, \
249 LANG_HOOKS_GENERIC_TYPE_P, \
250 LANG_HOOKS_TYPE_PROMOTES_TO, \
251 LANG_HOOKS_REGISTER_BUILTIN_TYPE, \
252 LANG_HOOKS_INCOMPLETE_TYPE_ERROR, \
253 LANG_HOOKS_TYPE_MAX_SIZE, \
254 LANG_HOOKS_OMP_FIRSTPRIVATIZE_TYPE_SIZES, \
255 /* APPLE LOCAL radar 6386976 */ \
256 LANG_HOOKS_IS_RUNTIME_SPECIFIC_TYPE, \
257 LANG_HOOKS_HASH_TYPES \
260 /* Declaration hooks. */
261 #define LANG_HOOKS_GLOBAL_BINDINGS_P global_bindings_p
262 #define LANG_HOOKS_INSERT_BLOCK insert_block
263 #define LANG_HOOKS_PUSHDECL pushdecl
264 #define LANG_HOOKS_GETDECLS getdecls
265 #define LANG_HOOKS_WARN_UNUSED_GLOBAL_DECL lhd_warn_unused_global_decl
266 #define LANG_HOOKS_WRITE_GLOBALS write_global_declarations
267 #define LANG_HOOKS_PREPARE_ASSEMBLE_VARIABLE NULL
268 #define LANG_HOOKS_DECL_OK_FOR_SIBCALL lhd_decl_ok_for_sibcall
269 #define LANG_HOOKS_COMDAT_GROUP lhd_comdat_group
270 #define LANG_HOOKS_OMP_PRIVATIZE_BY_REFERENCE hook_bool_tree_false
271 #define LANG_HOOKS_OMP_PREDETERMINED_SHARING lhd_omp_predetermined_sharing
272 #define LANG_HOOKS_OMP_DISREGARD_VALUE_EXPR hook_bool_tree_bool_false
273 #define LANG_HOOKS_OMP_PRIVATE_DEBUG_CLAUSE hook_bool_tree_bool_false
274 #define LANG_HOOKS_OMP_CLAUSE_DEFAULT_CTOR hook_tree_tree_tree_null
275 #define LANG_HOOKS_OMP_CLAUSE_COPY_CTOR lhd_omp_assignment
276 #define LANG_HOOKS_OMP_CLAUSE_ASSIGN_OP lhd_omp_assignment
277 #define LANG_HOOKS_OMP_CLAUSE_DTOR hook_tree_tree_tree_null
279 #define LANG_HOOKS_DECLS { \
280 LANG_HOOKS_GLOBAL_BINDINGS_P, \
281 LANG_HOOKS_INSERT_BLOCK, \
282 LANG_HOOKS_PUSHDECL, \
283 LANG_HOOKS_GETDECLS, \
284 LANG_HOOKS_WARN_UNUSED_GLOBAL_DECL, \
285 LANG_HOOKS_WRITE_GLOBALS, \
286 LANG_HOOKS_PREPARE_ASSEMBLE_VARIABLE, \
287 LANG_HOOKS_DECL_OK_FOR_SIBCALL, \
288 LANG_HOOKS_COMDAT_GROUP, \
289 LANG_HOOKS_OMP_PRIVATIZE_BY_REFERENCE, \
290 LANG_HOOKS_OMP_PREDETERMINED_SHARING, \
291 LANG_HOOKS_OMP_DISREGARD_VALUE_EXPR, \
292 LANG_HOOKS_OMP_PRIVATE_DEBUG_CLAUSE, \
293 LANG_HOOKS_OMP_CLAUSE_DEFAULT_CTOR, \
294 LANG_HOOKS_OMP_CLAUSE_COPY_CTOR, \
295 LANG_HOOKS_OMP_CLAUSE_ASSIGN_OP, \
296 LANG_HOOKS_OMP_CLAUSE_DTOR \
299 /* The whole thing. The structure is defined in langhooks.h. */
300 #define LANG_HOOKS_INITIALIZER { \
302 LANG_HOOKS_IDENTIFIER_SIZE, \
303 LANG_HOOKS_TREE_SIZE, \
304 LANG_HOOKS_INIT_OPTIONS, \
305 LANG_HOOKS_INITIALIZE_DIAGNOSTICS, \
306 LANG_HOOKS_HANDLE_OPTION, \
307 LANG_HOOKS_MISSING_ARGUMENT, \
308 LANG_HOOKS_POST_OPTIONS, \
311 LANG_HOOKS_PARSE_FILE, \
312 LANG_HOOKS_CLEAR_BINDING_STACK, \
313 LANG_HOOKS_GET_ALIAS_SET, \
314 LANG_HOOKS_EXPAND_CONSTANT, \
315 LANG_HOOKS_EXPAND_EXPR, \
316 LANG_HOOKS_EXPAND_DECL, \
317 LANG_HOOKS_SAFE_FROM_P, \
318 LANG_HOOKS_FINISH_INCOMPLETE_DECL, \
319 LANG_HOOKS_MARK_ADDRESSABLE, \
320 LANG_HOOKS_STATICP, \
321 LANG_HOOKS_DUP_LANG_SPECIFIC_DECL, \
322 LANG_HOOKS_SET_DECL_ASSEMBLER_NAME, \
323 LANG_HOOKS_CAN_USE_BIT_FIELDS_P, \
324 LANG_HOOKS_REDUCE_BIT_FIELD_OPERATIONS, \
325 LANG_HOOKS_NO_BODY_BLOCKS, \
326 LANG_HOOKS_PRINT_STATISTICS, \
327 LANG_HOOKS_PRINT_XNODE, \
328 LANG_HOOKS_PRINT_DECL, \
329 LANG_HOOKS_PRINT_TYPE, \
330 LANG_HOOKS_PRINT_IDENTIFIER, \
331 LANG_HOOKS_DECL_PRINTABLE_NAME, \
332 LANG_HOOKS_DWARF_NAME, \
333 LANG_HOOKS_TYPES_COMPATIBLE_P, \
334 LANG_HOOKS_GET_CALLEE_FNDECL, \
335 LANG_HOOKS_PRINT_ERROR_FUNCTION, \
336 LANG_HOOKS_EXPR_SIZE, \
337 LANG_HOOKS_TO_TARGET_CHARSET, \
338 LANG_HOOKS_ATTRIBUTE_TABLE, \
339 LANG_HOOKS_COMMON_ATTRIBUTE_TABLE, \
340 LANG_HOOKS_FORMAT_ATTRIBUTE_TABLE, \
341 LANG_HOOKS_FUNCTION_INITIALIZER, \
342 LANG_HOOKS_TREE_INLINING_INITIALIZER, \
343 LANG_HOOKS_CALLGRAPH_INITIALIZER, \
344 LANG_HOOKS_TREE_DUMP_INITIALIZER, \
346 LANG_HOOKS_FOR_TYPES_INITIALIZER, \
347 LANG_HOOKS_GIMPLIFY_EXPR, \
348 LANG_HOOKS_FOLD_OBJ_TYPE_REF, \
349 LANG_HOOKS_BUILTIN_FUNCTION, \
350 LANG_HOOKS_INIT_TS, \
351 LANG_HOOKS_EXPR_TO_DECL, \
352 /* APPLE LOCAL radar 6353006 */ \
353 LANG_HOOKS_BUILD_GENERIC_BLOCK_STRUCT_TYPE, \
356 #endif /* GCC_LANG_HOOKS_DEF_H */