2014-01-17 Richard Biener <rguenther@suse.de>
[official-gcc.git] / gcc / target-globals.c
blob8d3eaa89041e5479c020c0e18cb2eedb36069110
1 /* Target-dependent globals.
2 Copyright (C) 2010-2014 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
9 version.
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.
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/>. */
20 #include "config.h"
21 #include "system.h"
22 #include "coretypes.h"
23 #include "tm.h"
24 #include "insn-config.h"
25 #include "machmode.h"
26 #include "tree.h"
27 #include "ggc.h"
28 #include "toplev.h"
29 #include "target-globals.h"
30 #include "flags.h"
31 #include "regs.h"
32 #include "rtl.h"
33 #include "hard-reg-set.h"
34 #include "reload.h"
35 #include "expmed.h"
36 #include "expr.h"
37 #include "optabs.h"
38 #include "libfuncs.h"
39 #include "cfgloop.h"
40 #include "ira-int.h"
41 #include "lra-int.h"
42 #include "builtins.h"
43 #include "gcse.h"
44 #include "bb-reorder.h"
45 #include "lower-subreg.h"
47 #if SWITCHABLE_TARGET
48 struct target_globals default_target_globals = {
49 &default_target_flag_state,
50 &default_target_regs,
51 &default_target_rtl,
52 &default_target_hard_regs,
53 &default_target_reload,
54 &default_target_expmed,
55 &default_target_optabs,
56 &default_target_libfuncs,
57 &default_target_cfgloop,
58 &default_target_ira,
59 &default_target_ira_int,
60 &default_target_lra_int,
61 &default_target_builtins,
62 &default_target_gcse,
63 &default_target_bb_reorder,
64 &default_target_lower_subreg
67 struct target_globals *
68 save_target_globals (void)
70 struct target_globals *g;
71 struct target_globals_extra {
72 struct target_globals g;
73 struct target_flag_state flag_state;
74 struct target_optabs optabs;
75 struct target_cfgloop cfgloop;
76 struct target_builtins builtins;
77 struct target_gcse gcse;
78 struct target_bb_reorder bb_reorder;
79 struct target_lower_subreg lower_subreg;
80 } *p;
81 p = (struct target_globals_extra *)
82 ggc_internal_cleared_alloc_stat (sizeof (struct target_globals_extra)
83 PASS_MEM_STAT);
84 g = (struct target_globals *) p;
85 g->flag_state = &p->flag_state;
86 g->regs = ggc_internal_cleared_alloc_stat (sizeof (struct target_regs)
87 PASS_MEM_STAT);
88 g->rtl = ggc_alloc_cleared_target_rtl ();
89 g->hard_regs
90 = ggc_internal_cleared_alloc_stat (sizeof (struct target_hard_regs)
91 PASS_MEM_STAT);
92 g->reload = ggc_internal_cleared_alloc_stat (sizeof (struct target_reload)
93 PASS_MEM_STAT);
94 g->expmed = ggc_internal_cleared_alloc_stat (sizeof (struct target_expmed)
95 PASS_MEM_STAT);
96 g->optabs = &p->optabs;
97 g->libfuncs = ggc_alloc_cleared_target_libfuncs ();
98 g->cfgloop = &p->cfgloop;
99 g->ira = ggc_internal_cleared_alloc_stat (sizeof (struct target_ira)
100 PASS_MEM_STAT);
101 g->ira_int = ggc_internal_cleared_alloc_stat (sizeof (struct target_ira_int)
102 PASS_MEM_STAT);
103 g->lra_int = ggc_internal_cleared_alloc_stat (sizeof (struct target_lra_int)
104 PASS_MEM_STAT);
105 g->builtins = &p->builtins;
106 g->gcse = &p->gcse;
107 g->bb_reorder = &p->bb_reorder;
108 g->lower_subreg = &p->lower_subreg;
109 restore_target_globals (g);
110 init_reg_sets ();
111 target_reinit ();
112 return g;
115 /* Like save_target_globals() above, but set *this_target_optabs
116 correctly when a previous function has changed
117 *this_target_optabs. */
119 struct target_globals *
120 save_target_globals_default_opts ()
122 struct target_globals *globals;
124 if (optimization_current_node != optimization_default_node)
126 tree opts = optimization_current_node;
127 /* Temporarily switch to the default optimization node, so that
128 *this_target_optabs is set to the default, not reflecting
129 whatever a previous function used for the optimize
130 attribute. */
131 optimization_current_node = optimization_default_node;
132 cl_optimization_restore
133 (&global_options,
134 TREE_OPTIMIZATION (optimization_default_node));
135 globals = save_target_globals ();
136 optimization_current_node = opts;
137 cl_optimization_restore (&global_options,
138 TREE_OPTIMIZATION (opts));
139 return globals;
141 return save_target_globals ();
144 #endif