OSDN Git Service

5b128a7adaac49d5d7725b9757202e8cba1728a1
[pf3gnuchains/gcc-fork.git] / gcc / langhooks.h
1 /* The lang_hooks data structure.
2    Copyright 2001, 2002 Free Software Foundation, Inc.
3
4 This file is part of GNU CC.
5
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
9 any later version.
10
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING.  If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA.  */
20
21 #ifndef GCC_LANG_HOOKS_H
22 #define GCC_LANG_HOOKS_H
23
24 /* This file should be #include-d after tree.h.  */
25
26 struct diagnostic_context;
27
28 /* A print hook for print_tree ().  */
29 typedef void (*lang_print_tree_hook) PARAMS ((FILE *, tree, int indent));
30
31 /* The following hooks are documented in langhooks.c.  Must not be
32    NULL.  */
33
34 struct lang_hooks_for_tree_inlining
35 {
36   union tree_node *(*walk_subtrees) PARAMS ((union tree_node **, int *,
37                                              union tree_node *(*)
38                                              (union tree_node **,
39                                               int *, void *),
40                                              void *, void *));
41   int (*cannot_inline_tree_fn) PARAMS ((union tree_node **));
42   int (*disregard_inline_limits) PARAMS ((union tree_node *));
43   union tree_node *(*add_pending_fn_decls) PARAMS ((void *,
44                                                     union tree_node *));
45   int (*tree_chain_matters_p) PARAMS ((union tree_node *));
46   int (*auto_var_in_fn_p) PARAMS ((union tree_node *, union tree_node *));
47   union tree_node *(*copy_res_decl_for_inlining) PARAMS ((union tree_node *,
48                                                           union tree_node *,
49                                                           union tree_node *,
50                                                           void *, int *,
51                                                           void *));
52   int (*anon_aggr_type_p) PARAMS ((union tree_node *));
53   int (*start_inlining) PARAMS ((union tree_node *));
54   void (*end_inlining) PARAMS ((union tree_node *));
55   union tree_node *(*convert_parm_for_inlining) PARAMS ((union tree_node *,
56                                                          union tree_node *,
57                                                          union tree_node *));
58 };
59
60 /* The following hooks are used by tree-dump.c.  */
61
62 struct lang_hooks_for_tree_dump
63 {
64   /* Dump language-specific parts of tree nodes.  Returns non-zero if it 
65      does not want the usual dumping of the second argument.  */
66   int (*dump_tree) PARAMS ((void *, tree));
67
68   /* Determine type qualifiers in a language-specific way.  */
69   int (*type_quals) PARAMS ((tree));
70 };
71
72 /* Hooks related to types.  */
73
74 struct lang_hooks_for_types
75 {
76   /* Return a new type (with the indicated CODE), doing whatever
77      language-specific processing is required.  */
78   tree (*make_type) PARAMS ((enum tree_code));
79   
80   /* Given MODE and UNSIGNEDP, return a suitable type-tree with that
81      mode.  */
82   tree (*type_for_mode) PARAMS ((enum machine_mode, int));
83
84   /* Given PRECISION and UNSIGNEDP, return a suitable type-tree for an
85      integer type with at least that precision.  */
86   tree (*type_for_size) PARAMS ((unsigned, int));
87
88   /* Given an integer type T, return a type like T but unsigned.
89      If T is unsigned, the value is T.  */
90   tree (*unsigned_type) PARAMS ((tree));
91
92   /* Given an integer type T, return a type like T but signed.
93      If T is signed, the value is T.  */
94   tree (*signed_type) PARAMS ((tree));
95
96   /* Return a type the same as TYPE except unsigned or signed
97      according to UNSIGNEDP.  */
98   tree (*signed_or_unsigned_type) PARAMS ((int, tree));
99
100   /* Given a type, apply default promotions to unnamed function
101      arguments and return the new type.  Return the same type if no
102      change.  Required by any language that supports variadic
103      arguments.  The default hook aborts.  */
104   tree (*type_promotes_to) PARAMS ((tree));
105
106   /* This routine is called in tree.c to print an error message for
107      invalid use of an incomplete type.  VALUE is the expression that
108      was used (or 0 if that isn't known) and TYPE is the type that was
109      invalid.  */
110   void (*incomplete_type_error) PARAMS ((tree value, tree type));
111 };
112
113 /* Language hooks related to decls and the symbol table.  */
114
115 struct lang_hooks_for_decls
116 {
117   /* Enter a new lexical scope.  Argument is always zero when called
118      from outside the front end.  */
119   void (*pushlevel) PARAMS ((int));
120
121   /* Exit a lexical scope and return a BINDING for that scope.
122      Takes three arguments:
123      KEEP -- nonzero if there were declarations in this scope.
124      REVERSE -- reverse the order of decls before returning them.
125      FUNCTIONBODY -- nonzero if this level is the body of a function.  */
126   tree (*poplevel) PARAMS ((int, int, int));
127
128   /* Returns non-zero if we are in the global binding level.  Ada
129      returns -1 for an undocumented reason used in stor-layout.c.  */
130   int (*global_bindings_p) PARAMS ((void));
131
132   /* Insert BLOCK at the end of the list of subblocks of the
133      current binding level.  This is used when a BIND_EXPR is expanded,
134      to handle the BLOCK node inside the BIND_EXPR.  */
135   void (*insert_block) PARAMS ((tree));
136
137   /* Set the BLOCK node for the current scope level.  */
138   void (*set_block) PARAMS ((tree));
139
140   /* Function to add a decl to the current scope level.  Takes one
141      argument, a decl to add.  Returns that decl, or, if the same
142      symbol is already declared, may return a different decl for that
143      name.  */
144   tree (*pushdecl) PARAMS ((tree));
145
146   /* Returns the chain of decls so far in the current scope level.  */
147   tree (*getdecls) PARAMS ((void));
148
149   /* Returns true when we should warn for an unused global DECL.
150      We will already have checked that it has static binding.  */
151   bool (*warn_unused_global) PARAMS ((tree));
152 };
153
154 /* Language-specific hooks.  See langhooks-def.h for defaults.  */
155
156 struct lang_hooks
157 {
158   /* String identifying the front end.  e.g. "GNU C++".  */
159   const char *name;
160
161   /* sizeof (struct lang_identifier), so make_node () creates
162      identifier nodes long enough for the language-specific slots.  */
163   size_t identifier_size;
164
165   /* The first callback made to the front end, for simple
166      initialization needed before any calls to decode_option.  */
167   void (*init_options) PARAMS ((void));
168
169   /* Function called with an option vector as argument, to decode a
170      single option (typically starting with -f or -W or +).  It should
171      return the number of command-line arguments it uses if it handles
172      the option, or 0 and not complain if it does not recognise the
173      option.  If this function returns a negative number, then its
174      absolute value is the number of command-line arguments used, but,
175      in addition, no language-independent option processing should be
176      done for this option.  */
177   int (*decode_option) PARAMS ((int, char **));
178
179   /* Called when all command line options have been parsed.  Should do
180      any required consistency checks, modifications etc.  Complex
181      initialization should be left to the "init" callback, since GC
182      and the identifier hashes are set up between now and then.  */
183   void (*post_options) PARAMS ((void));
184
185   /* Called after post_options, to initialize the front end.  The main
186      input filename is passed, which may be NULL; the front end should
187      return the original filename (e.g. foo.i -> foo.c).  Return NULL
188      to indicate a serious error of some sort; in that case no
189      compilation is performed, and the finish hook is called
190      immediately.  */
191   const char * (*init) PARAMS ((const char *));
192
193   /* Called at the end of compilation, as a finalizer.  */
194   void (*finish) PARAMS ((void));
195
196   /* Parses the entire file.  */
197   void (*parse_file) PARAMS ((void));
198
199   /* Called immediately after parsing to clear the binding stack.  */
200   void (*clear_binding_stack) PARAMS ((void));
201
202   /* Called to obtain the alias set to be used for an expression or type.
203      Returns -1 if the language does nothing special for it.  */
204   HOST_WIDE_INT (*get_alias_set) PARAMS ((tree));
205
206   /* Called with an expression that is to be processed as a constant.
207      Returns either the same expression or a language-independent
208      constant equivalent to its input.  */
209   tree (*expand_constant) PARAMS ((tree));
210
211   /* Called by expand_expr for language-specific tree codes.
212      Fourth argument is actually an enum expand_modifier.  */
213   rtx (*expand_expr) PARAMS ((tree, rtx, enum machine_mode, int));
214
215   /* Prepare expr to be an argument of a TRUTH_NOT_EXPR or other logical
216      operation.
217
218      This preparation consists of taking the ordinary representation
219      of an expression expr and producing a valid tree boolean
220      expression describing whether expr is nonzero.  We could simply
221      always do build_binary_op (NE_EXPR, expr, integer_zero_node, 1),
222      but we optimize comparisons, &&, ||, and !.
223
224      The result should be an expression of boolean type (if not an
225      error_mark_node).  */
226   tree (*truthvalue_conversion) PARAMS ((tree));
227
228   /* Possibly apply default attributes to a function (represented by
229      a FUNCTION_DECL).  */
230   void (*insert_default_attributes) PARAMS ((tree));
231
232   /* Hook called by safe_from_p for language-specific tree codes.  It is
233      up to the language front-end to install a hook if it has any such
234      codes that safe_from_p needs to know about.  Since same_from_p will
235      recursively explore the TREE_OPERANDs of an expression, this hook
236      should not reexamine those pieces.  This routine may recursively
237      call safe_from_p; it should always pass `0' as the TOP_P
238      parameter.  */
239   int (*safe_from_p) PARAMS ((rtx, tree));
240
241   /* Function to finish handling an incomplete decl at the end of
242      compilation.  Default hook is does nothing.  */
243   void (*finish_incomplete_decl) PARAMS ((tree));
244
245   /* Function used by unsafe_for_reeval.  A non-negative number is
246      returned directly from unsafe_for_reeval, a negative number falls
247      through.  The default hook returns a negative number.  */
248   int (*unsafe_for_reeval) PARAMS ((tree));
249
250   /* Mark EXP saying that we need to be able to take the address of
251      it; it should not be allocated in a register.  Return true if
252      successful.  */
253   bool (*mark_addressable) PARAMS ((tree));
254
255   /* Hook called by staticp for language-specific tree codes.  */
256   int (*staticp) PARAMS ((tree));
257
258   /* Replace the DECL_LANG_SPECIFIC data, which may be NULL, of the
259      DECL_NODE with a newly GC-allocated copy.  */
260   void (*dup_lang_specific_decl) PARAMS ((tree));
261
262   /* Called before its argument, an UNSAVE_EXPR, is to be
263      unsaved.  Modify it in-place so that all the evaluate only once
264      things are cleared out.  */
265   tree (*unsave_expr_now) PARAMS ((tree));
266
267   /* Called by expand_expr to build and return the cleanup-expression
268      for the passed TARGET_EXPR.  Return NULL if there is none.  */
269   tree (*maybe_build_cleanup) PARAMS ((tree));
270
271   /* Mark nodes held through the lang_specific hooks in the tree.  */
272   void (*mark_tree) PARAMS ((tree));
273
274   /* Set the DECL_ASSEMBLER_NAME for a node.  If it is the sort of
275      thing that the assembler should talk about, set
276      DECL_ASSEMBLER_NAME to an appropriate IDENTIFIER_NODE.
277      Otherwise, set it to the ERROR_MARK_NODE to ensure that the
278      assembler does not talk about it.  */
279   void (*set_decl_assembler_name) PARAMS ((tree));
280
281   /* Nonzero if TYPE_READONLY and TREE_READONLY should always be honored.  */
282   bool honor_readonly;
283
284   /* The front end can add its own statistics to -fmem-report with
285      this hook.  It should output to stderr.  */
286   void (*print_statistics) PARAMS ((void));
287
288   /* Called by print_tree when there is a tree of class 'x' that it
289      doesn't know how to display.  */
290   lang_print_tree_hook print_xnode;
291
292   /* Called to print language-dependent parts of a class 'd', class
293      't', and IDENTIFIER_NODE nodes.  */
294   lang_print_tree_hook print_decl;
295   lang_print_tree_hook print_type;
296   lang_print_tree_hook print_identifier;
297
298   /* Computes the name to use to print a declaration.  DECL is the
299      non-NULL declaration in question.  VERBOSITY determines what
300      information will be printed: 0: DECL_NAME, demangled as
301      necessary.  1: and scope information.  2: and any other
302      information that might be interesting, such as function parameter
303      types in C++.  */
304   const char *(*decl_printable_name) PARAMS ((tree decl, int verbosity));
305
306   /* Called by report_error_function to print out function name.  */
307   void (*print_error_function) PARAMS ((struct diagnostic_context *,
308                                         const char *));
309
310   /* Set yydebug for bison-based parsers, when -dy is given on the
311      command line.  By default, if the parameter is non-zero, prints a
312      warning that the front end does not use such a parser.  */
313   void (*set_yydebug) PARAMS ((int));
314
315   struct lang_hooks_for_tree_inlining tree_inlining;
316   
317   struct lang_hooks_for_tree_dump tree_dump;
318
319   struct lang_hooks_for_decls decls;
320
321   struct lang_hooks_for_types types;
322
323   /* Whenever you add entries here, make sure you adjust langhooks-def.h
324      and langhooks.c accordingly.  */
325 };
326
327 /* Each front end provides its own.  */
328 extern const struct lang_hooks lang_hooks;
329
330 #endif /* GCC_LANG_HOOKS_H */