1 /* Target-dependent globals.
2 Copyright (C) 2010-2023 Free Software Foundation, Inc.
4 This file is part of GCC.
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
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
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/>. */
22 #include "coretypes.h"
27 #include "optabs-query.h"
28 #include "insn-config.h"
34 #include "target-globals.h"
41 #include "bb-reorder.h"
42 #include "lower-subreg.h"
43 #include "function-abi.h"
46 class target_globals default_target_globals
= {
47 &default_target_flag_state
,
50 &default_target_recog
,
51 &default_target_hard_regs
,
52 &default_target_function_abi_info
,
53 &default_target_reload
,
54 &default_target_expmed
,
55 &default_target_optabs
,
56 &default_target_libfuncs
,
57 &default_target_cfgloop
,
59 &default_target_ira_int
,
60 &default_target_builtins
,
62 &default_target_bb_reorder
,
63 &default_target_lower_subreg
66 class target_globals
*
67 save_target_globals (void)
69 class target_globals
*g
= ggc_cleared_alloc
<target_globals
> ();
70 g
->flag_state
= XCNEW (class target_flag_state
);
71 g
->regs
= XCNEW (struct target_regs
);
72 g
->rtl
= ggc_cleared_alloc
<target_rtl
> ();
73 g
->recog
= XCNEW (struct target_recog
);
74 g
->hard_regs
= XCNEW (struct target_hard_regs
);
75 g
->function_abi_info
= XCNEW (struct target_function_abi_info
);
76 g
->reload
= XCNEW (struct target_reload
);
77 g
->expmed
= XCNEW (struct target_expmed
);
78 g
->optabs
= XCNEW (struct target_optabs
);
79 g
->libfuncs
= ggc_cleared_alloc
<target_libfuncs
> ();
80 g
->cfgloop
= XCNEW (struct target_cfgloop
);
81 g
->ira
= XCNEW (struct target_ira
);
82 g
->ira_int
= XCNEW (class target_ira_int
);
83 g
->builtins
= XCNEW (struct target_builtins
);
84 g
->gcse
= XCNEW (struct target_gcse
);
85 g
->bb_reorder
= XCNEW (struct target_bb_reorder
);
86 g
->lower_subreg
= XCNEW (struct target_lower_subreg
);
87 restore_target_globals (g
);
93 /* Like save_target_globals() above, but set *this_target_optabs
94 correctly when a previous function has changed
95 *this_target_optabs. */
97 class target_globals
*
98 save_target_globals_default_opts ()
100 class target_globals
*globals
;
102 if (optimization_current_node
!= optimization_default_node
)
104 tree opts
= optimization_current_node
;
105 /* Temporarily switch to the default optimization node, so that
106 *this_target_optabs is set to the default, not reflecting
107 whatever a previous function used for the optimize
109 optimization_current_node
= optimization_default_node
;
110 cl_optimization_restore
111 (&global_options
, &global_options_set
,
112 TREE_OPTIMIZATION (optimization_default_node
));
113 globals
= save_target_globals ();
114 optimization_current_node
= opts
;
115 cl_optimization_restore (&global_options
, &global_options_set
,
116 TREE_OPTIMIZATION (opts
));
119 return save_target_globals ();
122 target_globals::~target_globals ()
124 /* default_target_globals points to static data so shouldn't be freed. */
125 if (this != &default_target_globals
)
127 ira_int
->~target_ira_int ();
128 hard_regs
->finalize ();
129 XDELETE (flag_state
);
133 XDELETE (function_abi_info
);
142 XDELETE (bb_reorder
);
143 XDELETE (lower_subreg
);