gcc/common/config/pa/pa-common.c

   1 /* HPPA common hooks.
   2    Copyright (C) 1992-2013 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
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 3, or (at your option)
   9 any later version.
  10
  11 GCC is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU General Public License 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 "common/common-target.h"
  25 #include "common/common-target-def.h"
  26 #include "opts.h"
  27 #include "flags.h"
  28
  29 /* Implement TARGET_OPTION_OPTIMIZATION_TABLE.  */
  30 static const struct default_options pa_option_optimization_table[] =
  31   {
  32     { OPT_LEVELS_1_PLUS, OPT_fomit_frame_pointer, NULL, 1 },
  33     { OPT_LEVELS_NONE, 0, NULL, 0 }
  34   };
  35
  36 /* Implement TARGET_HANDLE_OPTION.  */
  37
  38 static bool
  39 pa_handle_option (struct gcc_options *opts,
  40                   struct gcc_options *opts_set ATTRIBUTE_UNUSED,
  41                   const struct cl_decoded_option *decoded,
  42                   location_t loc ATTRIBUTE_UNUSED)
  43 {
  44   size_t code = decoded->opt_index;
  45
  46   switch (code)
  47     {
  48     case OPT_mnosnake:
  49     case OPT_mpa_risc_1_0:
  50     case OPT_march_1_0:
  51       opts->x_target_flags &= ~(MASK_PA_11 | MASK_PA_20);
  52       return true;
  53
  54     case OPT_msnake:
  55     case OPT_mpa_risc_1_1:
  56     case OPT_march_1_1:
  57       opts->x_target_flags &= ~MASK_PA_20;
  58       opts->x_target_flags |= MASK_PA_11;
  59       return true;
  60
  61     case OPT_mpa_risc_2_0:
  62     case OPT_march_2_0:
  63       opts->x_target_flags |= MASK_PA_11 | MASK_PA_20;
  64       return true;
  65
  66     default:
  67       return true;
  68     }
  69 }
  70
  71 #undef TARGET_OPTION_OPTIMIZATION_TABLE
  72 #define TARGET_OPTION_OPTIMIZATION_TABLE pa_option_optimization_table
  73 #undef TARGET_DEFAULT_TARGET_FLAGS
  74 #define TARGET_DEFAULT_TARGET_FLAGS (TARGET_DEFAULT | TARGET_CPU_DEFAULT)
  75 #undef TARGET_HANDLE_OPTION
  76 #define TARGET_HANDLE_OPTION pa_handle_option
  77
  78 struct gcc_targetm_common targetm_common = TARGETM_COMMON_INITIALIZER;