1/* Target-dependent globals.
2 Copyright (C) 2010-2024 Free Software Foundation, Inc.
3
4This file is part of GCC.
5
6GCC is free software; you can redistribute it and/or modify it under
7the terms of the GNU General Public License as published by the Free
8Software Foundation; either version 3, or (at your option) any later
9version.
10
11GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12WARRANTY; without even the implied warranty of MERCHANTABILITY or
13FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14for more details.
15
16You should have received a copy of the GNU General Public License
17along 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
47class 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
68class target_globals *
69save_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
100class target_globals *
101save_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
125target_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

source code of gcc/target-globals.cc