1 /* Target-dependent globals. 2 Copyright (C) 2010-2018 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 44 #if SWITCHABLE_TARGET 45 struct target_globals default_target_globals = { 46 &default_target_flag_state, 47 &default_target_regs, 48 &default_target_rtl, 49 &default_target_recog, 50 &default_target_hard_regs, 51 &default_target_reload, 52 &default_target_expmed, 53 &default_target_optabs, 54 &default_target_libfuncs, 55 &default_target_cfgloop, 56 &default_target_ira, 57 &default_target_ira_int, 58 &default_target_builtins, 59 &default_target_gcse, 60 &default_target_bb_reorder, 61 &default_target_lower_subreg 62 }; 63 64 struct target_globals * 65 save_target_globals (void) 66 { 67 struct target_globals *g = ggc_cleared_alloc <target_globals> (); 68 g->flag_state = XCNEW (struct target_flag_state); 69 g->regs = XCNEW (struct target_regs); 70 g->rtl = ggc_cleared_alloc<target_rtl> (); 71 g->recog = XCNEW (struct target_recog); 72 g->hard_regs = XCNEW (struct target_hard_regs); 73 g->reload = XCNEW (struct target_reload); 74 g->expmed = XCNEW (struct target_expmed); 75 g->optabs = XCNEW (struct target_optabs); 76 g->libfuncs = ggc_cleared_alloc<target_libfuncs> (); 77 g->cfgloop = XCNEW (struct target_cfgloop); 78 g->ira = XCNEW (struct target_ira); 79 g->ira_int = XCNEW (struct target_ira_int); 80 g->builtins = XCNEW (struct target_builtins); 81 g->gcse = XCNEW (struct target_gcse); 82 g->bb_reorder = XCNEW (struct target_bb_reorder); 83 g->lower_subreg = XCNEW (struct target_lower_subreg); 84 restore_target_globals (g); 85 init_reg_sets (); 86 target_reinit (); 87 return g; 88 } 89 90 /* Like save_target_globals() above, but set *this_target_optabs 91 correctly when a previous function has changed 92 *this_target_optabs. */ 93 94 struct target_globals * 95 save_target_globals_default_opts () 96 { 97 struct target_globals *globals; 98 99 if (optimization_current_node != optimization_default_node) 100 { 101 tree opts = optimization_current_node; 102 /* Temporarily switch to the default optimization node, so that 103 *this_target_optabs is set to the default, not reflecting 104 whatever a previous function used for the optimize 105 attribute. */ 106 optimization_current_node = optimization_default_node; 107 cl_optimization_restore 108 (&global_options, 109 TREE_OPTIMIZATION (optimization_default_node)); 110 globals = save_target_globals (); 111 optimization_current_node = opts; 112 cl_optimization_restore (&global_options, 113 TREE_OPTIMIZATION (opts)); 114 return globals; 115 } 116 return save_target_globals (); 117 } 118 119 target_globals::~target_globals () 120 { 121 /* default_target_globals points to static data so shouldn't be freed. */ 122 if (this != &default_target_globals) 123 { 124 ira_int->~target_ira_int (); 125 hard_regs->finalize (); 126 XDELETE (flag_state); 127 XDELETE (regs); 128 XDELETE (recog); 129 XDELETE (hard_regs); 130 XDELETE (reload); 131 XDELETE (expmed); 132 XDELETE (optabs); 133 XDELETE (cfgloop); 134 XDELETE (ira); 135 XDELETE (ira_int); 136 XDELETE (builtins); 137 XDELETE (gcse); 138 XDELETE (bb_reorder); 139 XDELETE (lower_subreg); 140 } 141 } 142 143 #endif 144