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> 4 5This file is part of GCC. 6 7GCC is free software; you can redistribute it and/or modify 8it under the terms of the GNU General Public License as published by 9the Free Software Foundation; either version 2, or (at your option) 10any later version. 11 12GCC is distributed in the hope that it will be useful, 13but WITHOUT ANY WARRANTY; without even the implied warranty of 14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15GNU General Public License for more details. 16 17You should have received a copy of the GNU General Public License 18along with GCC; see the file COPYING. If not, write to 19the Free Software Foundation, 51 Franklin Street, Fifth Floor, 20Boston, MA 02110-1301, USA. */ 21 22#ifndef GCC_LANG_HOOKS_DEF_H 23#define GCC_LANG_HOOKS_DEF_H 24 25#include "hooks.h" 26 27struct diagnostic_context; 28 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. */ 31extern HOST_WIDE_INT hook_get_alias_set_0 (tree); 32 33/* Note to creators of new hooks: 34 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. */ 39 40/* See langhooks.h for the definition and documentation of each hook. */ 41 42extern void lhd_do_nothing (void); 43extern void lhd_do_nothing_t (tree); 44extern void lhd_do_nothing_i (int); 45extern void lhd_do_nothing_f (struct function *); 46extern bool lhd_post_options (const char **); 47extern HOST_WIDE_INT lhd_get_alias_set (tree); 48extern tree lhd_return_tree (tree); 49extern tree lhd_return_null_tree_v (void); 50extern tree lhd_return_null_tree (tree); 51extern tree lhd_do_nothing_iii_return_null_tree (int, int, int); 52extern int lhd_safe_from_p (rtx, tree); 53extern tree lhd_staticp (tree); 54extern void lhd_print_tree_nothing (FILE *, tree, int); 55extern const char *lhd_decl_printable_name (tree, int); 56extern const char *lhd_dwarf_name (tree, int); 57extern int lhd_types_compatible_p (tree, tree); 58extern rtx lhd_expand_expr (tree, rtx, enum machine_mode, int, rtx *); 59extern int lhd_expand_decl (tree); 60extern void lhd_print_error_function (struct diagnostic_context *, 61 const char *); 62extern void lhd_set_decl_assembler_name (tree); 63extern bool lhd_can_use_bit_fields_p (void); 64extern bool lhd_warn_unused_global_decl (tree); 65extern void lhd_incomplete_type_error (tree, tree); 66extern tree lhd_type_promotes_to (tree); 67extern void lhd_register_builtin_type (tree, const char *); 68extern bool lhd_decl_ok_for_sibcall (tree); 69extern const char *lhd_comdat_group (tree); 70extern tree lhd_expr_size (tree); 71extern size_t lhd_tree_size (enum tree_code); 72extern HOST_WIDE_INT lhd_to_target_charset (HOST_WIDE_INT); 73extern tree lhd_expr_to_decl (tree, bool *, bool *, bool *); 74 75/* Declarations of default tree inlining hooks. */ 76extern tree lhd_tree_inlining_walk_subtrees (tree *, int *, walk_tree_fn, 77 void *, struct pointer_set_t*); 78extern int lhd_tree_inlining_cannot_inline_tree_fn (tree *); 79extern int lhd_tree_inlining_disregard_inline_limits (tree); 80extern tree lhd_tree_inlining_add_pending_fn_decls (void *, tree); 81extern int lhd_tree_inlining_auto_var_in_fn_p (tree, tree); 82extern int lhd_tree_inlining_anon_aggr_type_p (tree); 83extern int lhd_tree_inlining_start_inlining (tree); 84extern void lhd_tree_inlining_end_inlining (tree); 85extern tree lhd_tree_inlining_convert_parm_for_inlining (tree, tree, tree, int); 86extern void lhd_initialize_diagnostics (struct diagnostic_context *); 87extern tree lhd_callgraph_analyze_expr (tree *, int *, tree); 88 89 90/* Declarations for tree gimplification hooks. */ 91extern int lhd_gimplify_expr (tree *, tree *, tree *); 92extern enum omp_clause_default_kind lhd_omp_predetermined_sharing (tree); 93extern tree lhd_omp_assignment (tree, tree, tree); 94struct gimplify_omp_ctx; 95extern void lhd_omp_firstprivatize_type_sizes (struct gimplify_omp_ctx *, 96 tree); 97 98/* APPLE LOCAL begin 6353006 */ 99extern tree lhd_build_generic_block_struct_type (void); 100/* APPLE LOCAL end 6353006 */ 101 102/* APPLE LOCAL radar 6386976 */ 103extern bool lhd_is_runtime_specific_type (tree); 104 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 144 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 150 151/* APPLE LOCAL begin radar 6353006 */ 152#define LANG_HOOKS_BUILD_GENERIC_BLOCK_STRUCT_TYPE \ 153lhd_build_generic_block_struct_type 154/* APPLE LOCAL end radar 6353006 */ 155 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 160 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 181 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 \ 193} 194 195#define LANG_HOOKS_CALLGRAPH_ANALYZE_EXPR lhd_callgraph_analyze_expr 196#define LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION NULL 197 198#define LANG_HOOKS_CALLGRAPH_INITIALIZER { \ 199 LANG_HOOKS_CALLGRAPH_ANALYZE_EXPR, \ 200 LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION, \ 201} 202 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 \ 209} 210 211/* Hooks for tree gimplification. */ 212#define LANG_HOOKS_GIMPLIFY_EXPR lhd_gimplify_expr 213#define LANG_HOOKS_FOLD_OBJ_TYPE_REF NULL 214 215/* Tree dump hooks. */ 216extern bool lhd_tree_dump_dump_tree (void *, tree); 217extern int lhd_tree_dump_type_quals (tree); 218extern tree lhd_make_node (enum tree_code); 219 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 222 223#define LANG_HOOKS_TREE_DUMP_INITIALIZER { \ 224 LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN, \ 225 LANG_HOOKS_TREE_DUMP_TYPE_QUALS_FN \ 226} 227 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 241 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 \ 258} 259 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 278 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 \ 297} 298 299/* The whole thing. The structure is defined in langhooks.h. */ 300#define LANG_HOOKS_INITIALIZER { \ 301 LANG_HOOKS_NAME, \ 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, \ 309 LANG_HOOKS_INIT, \ 310 LANG_HOOKS_FINISH, \ 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, \ 345 LANG_HOOKS_DECLS, \ 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, \ 354} 355 356#endif /* GCC_LANG_HOOKS_DEF_H */ 357