1 | /* Target-dependent globals. |
2 | Copyright (C) 2010-2024 Free Software Foundation, Inc. |
3 | |
4 | This file is part of GCC. |
5 | |
6 | GCC is free software; you can redistribute it and/or modify it under |
7 | the terms of the GNU General Public License as published by the Free |
8 | Software Foundation; either version 3, or (at your option) any later |
9 | version. |
10 | |
11 | GCC is distributed in the hope that it will be useful, but WITHOUT ANY |
12 | WARRANTY; without even the implied warranty of MERCHANTABILITY or |
13 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
14 | for more details. |
15 | |
16 | You should have received a copy of the GNU General Public License |
17 | along with GCC; see the file COPYING3. If not see |
18 | <http://www.gnu.org/licenses/>. */ |
19 | |
20 | #include "config.h" |
21 | #include "system.h" |
22 | #include "coretypes.h" |
23 | #include "backend.h" |
24 | #include "rtl.h" |
25 | #include "tree.h" |
26 | #include "expmed.h" |
27 | #include "optabs-query.h" |
28 | #include "insn-config.h" |
29 | #include "regs.h" |
30 | #include "memmodel.h" |
31 | #include "ira.h" |
32 | #include "ira-int.h" |
33 | #include "toplev.h" |
34 | #include "target-globals.h" |
35 | #include "flags.h" |
36 | #include "reload.h" |
37 | #include "libfuncs.h" |
38 | #include "cfgloop.h" |
39 | #include "builtins.h" |
40 | #include "gcse.h" |
41 | #include "bb-reorder.h" |
42 | #include "lower-subreg.h" |
43 | #include "function-abi.h" |
44 | #include "tm_p.h" |
45 | |
46 | #if SWITCHABLE_TARGET |
47 | class target_globals default_target_globals = { |
48 | .flag_state: &default_target_flag_state, |
49 | .regs: &default_target_regs, |
50 | .rtl: &default_target_rtl, |
51 | .recog: &default_target_recog, |
52 | .hard_regs: &default_target_hard_regs, |
53 | .function_abi_info: &default_target_function_abi_info, |
54 | .reload: &default_target_reload, |
55 | .expmed: &default_target_expmed, |
56 | .optabs: &default_target_optabs, |
57 | .libfuncs: &default_target_libfuncs, |
58 | .cfgloop: &default_target_cfgloop, |
59 | .ira: &default_target_ira, |
60 | .ira_int: &default_target_ira_int, |
61 | .builtins: &default_target_builtins, |
62 | .gcse: &default_target_gcse, |
63 | .bb_reorder: &default_target_bb_reorder, |
64 | .lower_subreg: &default_target_lower_subreg, |
65 | .constraints: &default_target_constraints |
66 | }; |
67 | |
68 | class target_globals * |
69 | save_target_globals (void) |
70 | { |
71 | class target_globals *g = ggc_cleared_alloc <target_globals> (); |
72 | g->flag_state = XCNEW (class target_flag_state); |
73 | g->regs = XCNEW (struct target_regs); |
74 | g->rtl = ggc_cleared_alloc<target_rtl> (); |
75 | g->recog = XCNEW (struct target_recog); |
76 | g->hard_regs = XCNEW (struct target_hard_regs); |
77 | g->function_abi_info = XCNEW (struct target_function_abi_info); |
78 | g->reload = XCNEW (struct target_reload); |
79 | g->expmed = XCNEW (struct target_expmed); |
80 | g->optabs = XCNEW (struct target_optabs); |
81 | g->libfuncs = ggc_cleared_alloc<target_libfuncs> (); |
82 | g->cfgloop = XCNEW (struct target_cfgloop); |
83 | g->ira = XCNEW (struct target_ira); |
84 | g->ira_int = XCNEW (class target_ira_int); |
85 | g->builtins = XCNEW (struct target_builtins); |
86 | g->gcse = XCNEW (struct target_gcse); |
87 | g->bb_reorder = XCNEW (struct target_bb_reorder); |
88 | g->lower_subreg = XCNEW (struct target_lower_subreg); |
89 | g->constraints = XCNEW (target_constraints); |
90 | restore_target_globals (g); |
91 | init_reg_sets (); |
92 | target_reinit (); |
93 | return g; |
94 | } |
95 | |
96 | /* Like save_target_globals() above, but set *this_target_optabs |
97 | correctly when a previous function has changed |
98 | *this_target_optabs. */ |
99 | |
100 | class target_globals * |
101 | save_target_globals_default_opts () |
102 | { |
103 | class target_globals *globals; |
104 | |
105 | if (optimization_current_node != optimization_default_node) |
106 | { |
107 | tree opts = optimization_current_node; |
108 | /* Temporarily switch to the default optimization node, so that |
109 | *this_target_optabs is set to the default, not reflecting |
110 | whatever a previous function used for the optimize |
111 | attribute. */ |
112 | optimization_current_node = optimization_default_node; |
113 | cl_optimization_restore |
114 | (&global_options, &global_options_set, |
115 | TREE_OPTIMIZATION (optimization_default_node)); |
116 | globals = save_target_globals (); |
117 | optimization_current_node = opts; |
118 | cl_optimization_restore (&global_options, &global_options_set, |
119 | TREE_OPTIMIZATION (opts)); |
120 | return globals; |
121 | } |
122 | return save_target_globals (); |
123 | } |
124 | |
125 | target_globals::~target_globals () |
126 | { |
127 | /* default_target_globals points to static data so shouldn't be freed. */ |
128 | if (this != &default_target_globals) |
129 | { |
130 | ira_int->~target_ira_int (); |
131 | hard_regs->finalize (); |
132 | XDELETE (flag_state); |
133 | XDELETE (regs); |
134 | XDELETE (recog); |
135 | XDELETE (hard_regs); |
136 | XDELETE (function_abi_info); |
137 | XDELETE (reload); |
138 | XDELETE (expmed); |
139 | XDELETE (optabs); |
140 | XDELETE (cfgloop); |
141 | XDELETE (ira); |
142 | XDELETE (ira_int); |
143 | XDELETE (builtins); |
144 | XDELETE (gcse); |
145 | XDELETE (bb_reorder); |
146 | XDELETE (lower_subreg); |
147 | XDELETE (constraints); |
148 | } |
149 | } |
150 | |
151 | #endif |
152 | |