contrib/gcc/langhooks-def.h

   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
   5 This file is part of GCC.
   6
   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)
  10 any later version.
  11
  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.
  16
  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.  */
  21
  22 #ifndef GCC_LANG_HOOKS_DEF_H
  23 #define GCC_LANG_HOOKS_DEF_H
  24
  25 #include "hooks.h"
  26
  27 struct 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.  */
  31 extern 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
  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 *,
  61                                       const char *);
  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 *);
  74
  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);
  88
  89
  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 *,
  96                                                tree);
  97
  98 /* APPLE LOCAL begin 6353006  */
  99 extern tree lhd_build_generic_block_struct_type (void);
 100 /* APPLE LOCAL end 6353006  */
 101
 102 /* APPLE LOCAL radar 6386976  */
 103 extern 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 \
 153 lhd_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.  */
 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);
 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 */