gcc/ada/
[official-gcc.git] / gcc / hooks.c
blob92a21411a3f7efe28e03b93ff65eddfce04996aa
1 /* General-purpose hooks.
2 Copyright (C) 2002-2015 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify it
5 under the terms of the GNU General Public License as published by the
6 Free Software Foundation; either version 3, or (at your option) any
7 later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; see the file COPYING3. If not see
16 <http://www.gnu.org/licenses/>.
18 In other words, you are welcome to use, share and improve this program.
19 You are forbidden to forbid anyone else to use, share and improve
20 what you give them. Help stamp out software-hoarding! */
22 /* This file contains generic hooks that can be used as defaults for
23 target or language-dependent hook initializers. */
25 #include "config.h"
26 #include "system.h"
27 #include "coretypes.h"
28 #include "tm.h"
29 #include "hooks.h"
31 /* Generic hook that does absolutely zappo. */
32 void
33 hook_void_void (void)
37 /* Generic hook that takes no arguments and returns false. */
38 bool
39 hook_bool_void_false (void)
41 return false;
44 /* Generic hook that takes no arguments and returns true. */
45 bool
46 hook_bool_void_true (void)
48 return true;
51 /* Generic hook that takes (bool) and returns false. */
52 bool
53 hook_bool_bool_false (bool a ATTRIBUTE_UNUSED)
55 return false;
58 /* Generic hook that takes (bool, struct gcc_options *) and returns false. */
59 bool
60 hook_bool_bool_gcc_optionsp_false (bool a ATTRIBUTE_UNUSED,
61 struct gcc_options *opts ATTRIBUTE_UNUSED)
63 return false;
66 /* Generic hook that takes const int, const int) and returns true. */
67 bool hook_bool_const_int_const_int_true (const int a ATTRIBUTE_UNUSED,
68 const int b ATTRIBUTE_UNUSED)
70 return true;
73 /* Generic hook that takes (machine_mode) and returns false. */
74 bool
75 hook_bool_mode_false (machine_mode mode ATTRIBUTE_UNUSED)
77 return false;
80 /* Generic hook that takes (machine_mode) and returns true. */
81 bool
82 hook_bool_mode_true (machine_mode mode ATTRIBUTE_UNUSED)
84 return true;
87 /* Generic hook that takes (machine_mode, const_rtx) and returns false. */
88 bool
89 hook_bool_mode_const_rtx_false (machine_mode mode ATTRIBUTE_UNUSED,
90 const_rtx value ATTRIBUTE_UNUSED)
92 return false;
95 /* Generic hook that takes (machine_mode, const_rtx) and returns true. */
96 bool
97 hook_bool_mode_const_rtx_true (machine_mode mode ATTRIBUTE_UNUSED,
98 const_rtx value ATTRIBUTE_UNUSED)
100 return true;
103 /* Generic hook that takes (machine_mode, rtx) and returns false. */
104 bool
105 hook_bool_mode_rtx_false (machine_mode mode ATTRIBUTE_UNUSED,
106 rtx value ATTRIBUTE_UNUSED)
108 return false;
111 /* Generic hook that takes (machine_mode, rtx) and returns true. */
112 bool
113 hook_bool_mode_rtx_true (machine_mode mode ATTRIBUTE_UNUSED,
114 rtx value ATTRIBUTE_UNUSED)
116 return true;
119 /* Generic hook that takes (const rtx_insn *, const rtx_insn *) and returns true. */
120 bool
121 hook_bool_const_rtx_insn_const_rtx_insn_true (const rtx_insn *follower ATTRIBUTE_UNUSED,
122 const rtx_insn *followee ATTRIBUTE_UNUSED)
124 return true;
127 /* Generic hook that takes (machine_mode, unsigned HOST_WIDE_INT)
128 and returns false. */
129 bool
130 hook_bool_mode_uhwi_false (machine_mode mode ATTRIBUTE_UNUSED,
131 unsigned HOST_WIDE_INT value ATTRIBUTE_UNUSED)
133 return false;
136 /* Generic hook that takes (FILE *, const char *) and does nothing. */
137 void
138 hook_void_FILEptr_constcharptr (FILE *a ATTRIBUTE_UNUSED, const char *b ATTRIBUTE_UNUSED)
142 /* Generic hook that takes (FILE *, const char *, constr_tree *) and does
143 nothing. */
144 void
145 hook_void_FILEptr_constcharptr_const_tree (FILE *, const char *, const_tree)
149 /* Generic hook that takes (FILE *, rtx) and returns false. */
150 bool
151 hook_bool_FILEptr_rtx_false (FILE *a ATTRIBUTE_UNUSED,
152 rtx b ATTRIBUTE_UNUSED)
154 return false;
157 /* Generic hook that takes (gimple_stmt_iterator *) and returns
158 false. */
159 bool
160 hook_bool_gsiptr_false (gimple_stmt_iterator *a ATTRIBUTE_UNUSED)
162 return false;
165 /* Used for the TARGET_ASM_CAN_OUTPUT_MI_THUNK hook. */
166 bool
167 hook_bool_const_tree_hwi_hwi_const_tree_false (const_tree a ATTRIBUTE_UNUSED,
168 HOST_WIDE_INT b ATTRIBUTE_UNUSED,
169 HOST_WIDE_INT c ATTRIBUTE_UNUSED,
170 const_tree d ATTRIBUTE_UNUSED)
172 return false;
175 bool
176 hook_bool_const_tree_hwi_hwi_const_tree_true (const_tree a ATTRIBUTE_UNUSED,
177 HOST_WIDE_INT b ATTRIBUTE_UNUSED,
178 HOST_WIDE_INT c ATTRIBUTE_UNUSED,
179 const_tree d ATTRIBUTE_UNUSED)
181 return true;
184 bool
185 default_can_output_mi_thunk_no_vcall (const_tree a ATTRIBUTE_UNUSED,
186 HOST_WIDE_INT b ATTRIBUTE_UNUSED,
187 HOST_WIDE_INT c,
188 const_tree d ATTRIBUTE_UNUSED)
190 return c == 0;
194 hook_int_uint_mode_1 (unsigned int a ATTRIBUTE_UNUSED,
195 machine_mode b ATTRIBUTE_UNUSED)
197 return 1;
201 hook_int_const_tree_0 (const_tree a ATTRIBUTE_UNUSED)
203 return 0;
206 /* ??? Used for comp_type_attributes, which ought to return bool. */
208 hook_int_const_tree_const_tree_1 (const_tree a ATTRIBUTE_UNUSED, const_tree b ATTRIBUTE_UNUSED)
210 return 1;
214 hook_int_rtx_0 (rtx a ATTRIBUTE_UNUSED)
216 return 0;
220 hook_int_rtx_1 (rtx)
222 return 1;
226 hook_int_rtx_insn_unreachable (rtx_insn *)
228 gcc_unreachable ();
232 hook_int_rtx_bool_0 (rtx a ATTRIBUTE_UNUSED, bool b ATTRIBUTE_UNUSED)
234 return 0;
238 hook_int_rtx_mode_as_bool_0 (rtx, machine_mode, addr_space_t, bool)
240 return 0;
243 unsigned int
244 hook_uint_void_0 (void)
246 return 0;
249 void
250 hook_void_tree (tree a ATTRIBUTE_UNUSED)
254 void
255 hook_void_rtx_tree (rtx, tree)
259 void
260 hook_void_constcharptr (const char *a ATTRIBUTE_UNUSED)
264 void
265 hook_void_tree_treeptr (tree a ATTRIBUTE_UNUSED, tree *b ATTRIBUTE_UNUSED)
269 void
270 hook_void_int_int (int a ATTRIBUTE_UNUSED, int b ATTRIBUTE_UNUSED)
274 bool
275 hook_bool_tree_false (tree a ATTRIBUTE_UNUSED)
277 return false;
280 bool
281 hook_bool_const_tree_false (const_tree a ATTRIBUTE_UNUSED)
283 return false;
286 bool
287 hook_bool_tree_true (tree a ATTRIBUTE_UNUSED)
289 return true;
292 bool
293 hook_bool_const_tree_true (const_tree a ATTRIBUTE_UNUSED)
295 return true;
298 bool
299 hook_bool_tree_tree_false (tree a ATTRIBUTE_UNUSED, tree b ATTRIBUTE_UNUSED)
301 return false;
304 bool
305 hook_bool_tree_tree_true (tree a ATTRIBUTE_UNUSED, tree b ATTRIBUTE_UNUSED)
307 return true;
310 bool
311 hook_bool_tree_bool_false (tree a ATTRIBUTE_UNUSED, bool b ATTRIBUTE_UNUSED)
313 return false;
316 bool
317 hook_bool_rtx_insn_true (rtx_insn *insn ATTRIBUTE_UNUSED)
319 return true;
322 bool
323 hook_bool_rtx_false (rtx a ATTRIBUTE_UNUSED)
325 return false;
328 bool
329 hook_bool_uintp_uintp_false (unsigned int *a ATTRIBUTE_UNUSED,
330 unsigned int *b ATTRIBUTE_UNUSED)
332 return false;
335 bool
336 hook_bool_rtx_int_int_int_intp_bool_false (rtx a ATTRIBUTE_UNUSED,
337 int b ATTRIBUTE_UNUSED,
338 int c ATTRIBUTE_UNUSED,
339 int d ATTRIBUTE_UNUSED,
340 int *e ATTRIBUTE_UNUSED,
341 bool speed_p ATTRIBUTE_UNUSED)
343 return false;
346 bool
347 hook_bool_wint_wint_uint_bool_true (const widest_int &, const widest_int &,
348 unsigned int, bool)
350 return true;
353 /* Generic hook that takes an rtx and returns it. */
355 hook_rtx_rtx_identity (rtx x)
357 return x;
360 /* Generic hook that takes an rtx and returns NULL_RTX. */
362 hook_rtx_rtx_null (rtx x ATTRIBUTE_UNUSED)
364 return NULL;
367 /* Generic hook that takes a tree and an int and returns NULL_RTX. */
369 hook_rtx_tree_int_null (tree a ATTRIBUTE_UNUSED, int b ATTRIBUTE_UNUSED)
371 return NULL;
374 /* Generic hook that takes a machine mode and returns an unsigned int 0. */
375 unsigned int
376 hook_uint_mode_0 (machine_mode m ATTRIBUTE_UNUSED)
378 return 0;
381 /* Generic hook that takes no arguments and returns a NULL const string. */
382 const char *
383 hook_constcharptr_void_null (void)
385 return NULL;
388 /* Generic hook that takes no arguments and returns a NULL string. */
389 char *
390 hook_charptr_void_null (void)
392 return NULL;
395 /* Generic hook that takes a tree and returns a NULL string. */
396 const char *
397 hook_constcharptr_const_tree_null (const_tree t ATTRIBUTE_UNUSED)
399 return NULL;
402 tree
403 hook_tree_tree_int_treep_bool_null (tree t0 ATTRIBUTE_UNUSED,
404 int i ATTRIBUTE_UNUSED,
405 tree *p ATTRIBUTE_UNUSED,
406 bool ignore ATTRIBUTE_UNUSED)
408 return NULL;
411 tree
412 hook_tree_tree_tree_null (tree t0 ATTRIBUTE_UNUSED, tree t1 ATTRIBUTE_UNUSED)
414 return NULL;
417 tree
418 hook_tree_tree_tree_tree_null (tree t0 ATTRIBUTE_UNUSED,
419 tree t1 ATTRIBUTE_UNUSED,
420 tree t2 ATTRIBUTE_UNUSED)
422 return NULL;
425 /* Generic hook that takes an rtx_insn *and returns a NULL string. */
426 const char *
427 hook_constcharptr_const_rtx_insn_null (const rtx_insn *insn ATTRIBUTE_UNUSED)
429 return NULL;
432 const char *
433 hook_constcharptr_const_tree_const_tree_null (const_tree t0 ATTRIBUTE_UNUSED,
434 const_tree t1 ATTRIBUTE_UNUSED)
436 return NULL;
439 const char *
440 hook_constcharptr_int_const_tree_null (int i ATTRIBUTE_UNUSED,
441 const_tree t0 ATTRIBUTE_UNUSED)
443 return NULL;
446 const char *
447 hook_constcharptr_int_const_tree_const_tree_null (int i ATTRIBUTE_UNUSED,
448 const_tree t0 ATTRIBUTE_UNUSED,
449 const_tree t1 ATTRIBUTE_UNUSED)
451 return NULL;
454 /* Generic hook that takes a const_tree and returns NULL_TREE. */
455 tree
456 hook_tree_const_tree_null (const_tree t ATTRIBUTE_UNUSED)
458 return NULL;
461 /* Generic hook that takes a rtx_insn * and an int and returns a bool. */
463 bool
464 hook_bool_rtx_insn_int_false (rtx_insn *insn ATTRIBUTE_UNUSED,
465 int mode ATTRIBUTE_UNUSED)
467 return false;
470 /* Generic hook that takes a rtx_insn * and an int and returns void. */
472 void
473 hook_void_rtx_insn_int (rtx_insn *insn ATTRIBUTE_UNUSED,
474 int mode ATTRIBUTE_UNUSED)
478 /* Generic hook that takes a struct gcc_options * and returns void. */
480 void
481 hook_void_gcc_optionsp (struct gcc_options *opts ATTRIBUTE_UNUSED)