gcc/target-globals.cc

   1 /* Target-dependent globals.
   2    Copyright (C) 2010-2024 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 #include "function-abi.h"
  44 #include "tm_p.h"
  45
  46 #if SWITCHABLE_TARGET
  47 class target_globals default_target_globals = {
  48   &default_target_flag_state,
  49   &default_target_regs,
  50   &default_target_rtl,
  51   &default_target_recog,
  52   &default_target_hard_regs,
  53   &default_target_function_abi_info,
  54   &default_target_reload,
  55   &default_target_expmed,
  56   &default_target_optabs,
  57   &default_target_libfuncs,
  58   &default_target_cfgloop,
  59   &default_target_ira,
  60   &default_target_ira_int,
  61   &default_target_builtins,
  62   &default_target_gcse,
  63   &default_target_bb_reorder,
  64   &default_target_lower_subreg,
  65   &default_target_constraints
  66 };
  67
  68 class target_globals *
  69 save_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
 100 class target_globals *
 101 save_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
 125 target_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