OSDN Git Service

* c-dump.c: Resurrect.
[pf3gnuchains/gcc-fork.git] / gcc / c-lang.c
1 /* Language-specific hook definitions for C front end.
2    Copyright (C) 1991, 1995, 1997, 1998,
3    1999, 2000, 2001 Free Software Foundation, Inc.
4
5 This file is part of GCC.
6
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.
11
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.
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 the Free
19 Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20 02111-1307, USA.  */
21
22
23 #include "config.h"
24 #include "system.h"
25 #include "tree.h"
26 #include "c-tree.h"
27 #include "c-common.h"
28 #include "ggc.h"
29 #include "langhooks.h"
30 #include "langhooks-def.h"
31
32 static const char *c_init PARAMS ((const char *));
33 static void c_init_options PARAMS ((void));
34
35 /* ### When changing hooks, consider if ObjC needs changing too!! ### */
36
37 #undef LANG_HOOKS_NAME
38 #define LANG_HOOKS_NAME "GNU C"
39 #undef LANG_HOOKS_INIT
40 #define LANG_HOOKS_INIT c_init
41 #undef LANG_HOOKS_FINISH
42 #define LANG_HOOKS_FINISH c_common_finish
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
48 #define LANG_HOOKS_POST_OPTIONS c_common_post_options
49 #undef LANG_HOOKS_GET_ALIAS_SET
50 #define LANG_HOOKS_GET_ALIAS_SET c_common_get_alias_set
51 #undef LANG_HOOKS_SAFE_FROM_P
52 #define LANG_HOOKS_SAFE_FROM_P c_safe_from_p
53 #undef LANG_HOOKS_EXPAND_EXPR
54 #define LANG_HOOKS_EXPAND_EXPR c_expand_expr
55 #undef LANG_HOOKS_MARK_ADDRESSABLE
56 #define LANG_HOOKS_MARK_ADDRESSABLE c_mark_addressable
57 #undef LANG_HOOKS_PARSE_FILE
58 #define LANG_HOOKS_PARSE_FILE c_common_parse_file
59 #undef LANG_HOOKS_TRUTHVALUE_CONVERSION
60 #define LANG_HOOKS_TRUTHVALUE_CONVERSION c_common_truthvalue_conversion
61 #undef LANG_HOOKS_INSERT_DEFAULT_ATTRIBUTES
62 #define LANG_HOOKS_INSERT_DEFAULT_ATTRIBUTES c_insert_default_attributes
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
67 #undef LANG_HOOKS_STATICP
68 #define LANG_HOOKS_STATICP c_staticp
69 #undef LANG_HOOKS_WARN_UNUSED_GLOBAL_DECL
70 #define LANG_HOOKS_WARN_UNUSED_GLOBAL_DECL c_warn_unused_global_decl
71 #undef LANG_HOOKS_PRINT_IDENTIFIER
72 #define LANG_HOOKS_PRINT_IDENTIFIER c_print_identifier
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
77 #undef LANG_HOOKS_DUP_LANG_SPECIFIC_DECL
78 #define LANG_HOOKS_DUP_LANG_SPECIFIC_DECL c_dup_lang_specific_decl
79
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
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
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
98 #undef LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN
99 #define LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN c_dump_tree
100
101 #undef LANG_HOOKS_TYPE_FOR_MODE
102 #define LANG_HOOKS_TYPE_FOR_MODE c_common_type_for_mode
103 #undef LANG_HOOKS_TYPE_FOR_SIZE
104 #define LANG_HOOKS_TYPE_FOR_SIZE c_common_type_for_size
105 #undef LANG_HOOKS_SIGNED_TYPE
106 #define LANG_HOOKS_SIGNED_TYPE c_common_signed_type
107 #undef LANG_HOOKS_UNSIGNED_TYPE
108 #define LANG_HOOKS_UNSIGNED_TYPE c_common_unsigned_type
109 #undef LANG_HOOKS_SIGNED_OR_UNSIGNED_TYPE
110 #define LANG_HOOKS_SIGNED_OR_UNSIGNED_TYPE c_common_signed_or_unsigned_type
111 #undef LANG_HOOKS_INCOMPLETE_TYPE_ERROR
112 #define LANG_HOOKS_INCOMPLETE_TYPE_ERROR c_incomplete_type_error
113 #undef LANG_HOOKS_TYPE_PROMOTES_TO
114 #define LANG_HOOKS_TYPE_PROMOTES_TO c_type_promotes_to
115
116 /* ### When changing hooks, consider if ObjC needs changing too!! ### */
117
118 /* Each front end provides its own.  */
119 const struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER;
120
121 /* Tree code classes.  */
122
123 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) TYPE,
124
125 const char tree_code_type[] = {
126 #include "tree.def"
127   'x',
128 #include "c-common.def"
129 };
130 #undef DEFTREECODE
131
132 /* Table indexed by tree code giving number of expression
133    operands beyond the fixed part of the node structure.
134    Not used for types or decls.  */
135
136 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) LENGTH,
137
138 const unsigned char tree_code_length[] = {
139 #include "tree.def"
140   0,
141 #include "c-common.def"
142 };
143 #undef DEFTREECODE
144
145 /* Names of tree components.
146    Used for printing out the tree and error messages.  */
147 #define DEFTREECODE(SYM, NAME, TYPE, LEN) NAME,
148
149 const char *const tree_code_name[] = {
150 #include "tree.def"
151   "@@dummy",
152 #include "c-common.def"
153 };
154 #undef DEFTREECODE
155
156 static void
157 c_init_options ()
158 {
159   c_common_init_options (clk_c);
160 }
161
162 static const char *
163 c_init (filename)
164      const char *filename;
165 {
166   return c_objc_common_init (filename);
167 }
168
169 /* Used by c-lex.c, but only for objc.  */
170
171 tree
172 lookup_interface (arg)
173      tree arg ATTRIBUTE_UNUSED;
174 {
175   return 0;
176 }
177
178 tree
179 is_class_name (arg)
180     tree arg ATTRIBUTE_UNUSED;
181 {
182   return 0;
183 }
184
185 void
186 maybe_objc_check_decl (decl)
187      tree decl ATTRIBUTE_UNUSED;
188 {
189 }
190
191 int
192 maybe_objc_comptypes (lhs, rhs, reflexive)
193      tree lhs ATTRIBUTE_UNUSED;
194      tree rhs ATTRIBUTE_UNUSED;
195      int reflexive ATTRIBUTE_UNUSED;
196 {
197   return -1;
198 }
199
200 tree
201 maybe_building_objc_message_expr ()
202 {
203   return 0;
204 }
205
206 int
207 recognize_objc_keyword ()
208 {
209   return 0;
210 }
211
212 /* Used by c-typeck.c (build_external_ref), but only for objc.  */
213
214 tree
215 lookup_objc_ivar (id)
216      tree id ATTRIBUTE_UNUSED;
217 {
218   return 0;
219 }
220
221 void
222 finish_file ()
223 {
224   c_objc_common_finish_file ();
225 }
226
227 #include "gtype-c.h"