gcc/target-globals.c

   1 /* Target-dependent globals.
   2    Copyright (C) 2010-2015 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 "tm.h"
  24 #include "insn-config.h"
  25 #include "machmode.h"
  26 #include "hash-set.h"
  27 #include "vec.h"
  28 #include "double-int.h"
  29 #include "input.h"
  30 #include "alias.h"
  31 #include "symtab.h"
  32 #include "wide-int.h"
  33 #include "inchash.h"
  34 #include "tree.h"
  35 #include "ggc.h"
  36 #include "toplev.h"
  37 #include "target-globals.h"
  38 #include "flags.h"
  39 #include "regs.h"
  40 #include "rtl.h"
  41 #include "hard-reg-set.h"
  42 #include "reload.h"
  43 #include "expmed.h"
  44 #include "hashtab.h"
  45 #include "function.h"
  46 #include "statistics.h"
  47 #include "real.h"
  48 #include "fixed-value.h"
  49 #include "dojump.h"
  50 #include "explow.h"
  51 #include "calls.h"
  52 #include "emit-rtl.h"
  53 #include "varasm.h"
  54 #include "stmt.h"
  55 #include "expr.h"
  56 #include "insn-codes.h"
  57 #include "optabs.h"
  58 #include "libfuncs.h"
  59 #include "cfgloop.h"
  60 #include "recog.h"
  61 #include "ira-int.h"
  62 #include "builtins.h"
  63 #include "gcse.h"
  64 #include "bb-reorder.h"
  65 #include "lower-subreg.h"
  66 #include "recog.h"
  67
  68 #if SWITCHABLE_TARGET
  69 struct target_globals default_target_globals = {
  70   &default_target_flag_state,
  71   &default_target_regs,
  72   &default_target_rtl,
  73   &default_target_recog,
  74   &default_target_hard_regs,
  75   &default_target_reload,
  76   &default_target_expmed,
  77   &default_target_optabs,
  78   &default_target_libfuncs,
  79   &default_target_cfgloop,
  80   &default_target_ira,
  81   &default_target_ira_int,
  82   &default_target_builtins,
  83   &default_target_gcse,
  84   &default_target_bb_reorder,
  85   &default_target_lower_subreg
  86 };
  87
  88 struct target_globals *
  89 save_target_globals (void)
  90 {
  91   struct target_globals *g = ggc_cleared_alloc <target_globals> ();
  92   g->flag_state = XCNEW (struct target_flag_state);
  93   g->regs = XCNEW (struct target_regs);
  94   g->rtl = ggc_cleared_alloc<target_rtl> ();
  95   g->recog = XCNEW (struct target_recog);
  96   g->hard_regs = XCNEW (struct target_hard_regs);
  97   g->reload = XCNEW (struct target_reload);
  98   g->expmed = XCNEW (struct target_expmed);
  99   g->optabs = XCNEW (struct target_optabs);
 100   g->libfuncs = ggc_cleared_alloc<target_libfuncs> ();
 101   g->cfgloop = XCNEW (struct target_cfgloop);
 102   g->ira = XCNEW (struct target_ira);
 103   g->ira_int = XCNEW (struct target_ira_int);
 104   g->builtins = XCNEW (struct target_builtins);
 105   g->gcse = XCNEW (struct target_gcse);
 106   g->bb_reorder = XCNEW (struct target_bb_reorder);
 107   g->lower_subreg = XCNEW (struct target_lower_subreg);
 108   restore_target_globals (g);
 109   init_reg_sets ();
 110   target_reinit ();
 111   return g;
 112 }
 113
 114 /* Like save_target_globals() above, but set *this_target_optabs
 115    correctly when a previous function has changed
 116    *this_target_optabs.  */
 117
 118 struct target_globals *
 119 save_target_globals_default_opts ()
 120 {
 121   struct target_globals *globals;
 122
 123   if (optimization_current_node != optimization_default_node)
 124     {
 125       tree opts = optimization_current_node;
 126       /* Temporarily switch to the default optimization node, so that
 127          *this_target_optabs is set to the default, not reflecting
 128          whatever a previous function used for the optimize
 129          attribute.  */
 130       optimization_current_node = optimization_default_node;
 131       cl_optimization_restore
 132         (&global_options,
 133          TREE_OPTIMIZATION (optimization_default_node));
 134       globals = save_target_globals ();
 135       optimization_current_node = opts;
 136       cl_optimization_restore (&global_options,
 137                                TREE_OPTIMIZATION (opts));
 138       return globals;
 139     }
 140   return save_target_globals ();
 141 }
 142
 143 target_globals::~target_globals ()
 144 {
 145   /* default_target_globals points to static data so shouldn't be freed.  */
 146   if (this != &default_target_globals)
 147     {
 148       ira_int->~target_ira_int ();
 149       hard_regs->finalize ();
 150       XDELETE (flag_state);
 151       XDELETE (regs);
 152       XDELETE (recog);
 153       XDELETE (hard_regs);
 154       XDELETE (reload);
 155       XDELETE (expmed);
 156       XDELETE (optabs);
 157       XDELETE (cfgloop);
 158       XDELETE (ira);
 159       XDELETE (ira_int);
 160       XDELETE (builtins);
 161       XDELETE (gcse);
 162       XDELETE (bb_reorder);
 163       XDELETE (lower_subreg);
 164     }
 165 }
 166
 167 #endif