[thirdparty/gcc.git] / gcc / common / config / rs6000 / rs6000-common.c

/* Common hooks for IBM RS/6000.
   Copyright (C) 1991-2018 Free Software Foundation, Inc.

   This file is part of GCC.

   GCC is free software; you can redistribute it and/or modify it
   under the terms of the GNU General Public License as published
   by the Free Software Foundation; either version 3, or (at your
   option) any later version.

   GCC is distributed in the hope that it will be useful, but WITHOUT
   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
   or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
   License for more details.

   You should have received a copy of the GNU General Public License
   along with GCC; see the file COPYING3.  If not see
   <http://www.gnu.org/licenses/>.  */

#include "config.h"
#include "system.h"
#include "coretypes.h"
#include "diagnostic-core.h"
#include "tm.h"
#include "common/common-target.h"
#include "common/common-target-def.h"
#include "opts.h"
#include "flags.h"
#include "params.h"

/* Implement TARGET_OPTION_OPTIMIZATION_TABLE.  */
static const struct default_options rs6000_option_optimization_table[] =
  {
    /* Enable -fsched-pressure for first pass instruction scheduling.  */
    { OPT_LEVELS_1_PLUS, OPT_fsched_pressure, NULL, 1 },
    { OPT_LEVELS_NONE, 0, NULL, 0 }
  };

/* Implement TARGET_OPTION_INIT_STRUCT.  */

static void
rs6000_option_init_struct (struct gcc_options *opts)
{
  if (DEFAULT_ABI == ABI_DARWIN)
    /* The Darwin libraries never set errno, so we might as well
       avoid calling them when that's the only reason we would.  */
    opts->x_flag_errno_math = 0;

  /* Enable section anchors by default.  */
  if (!TARGET_MACHO)
    opts->x_flag_section_anchors = 1;
}

/* Implement TARGET_OPTION_DEFAULT_PARAMS.  */

static void
rs6000_option_default_params (void)
{
  /* Double growth factor to counter reduced min jump length.  */
  set_default_param_value (PARAM_MAX_GROW_COPY_BB_INSNS, 16);
}

/* If not otherwise specified by a target, make 'long double' equivalent to
   'double'.  */

#ifndef RS6000_DEFAULT_LONG_DOUBLE_SIZE
#define RS6000_DEFAULT_LONG_DOUBLE_SIZE 64
#endif

/* Implement TARGET_HANDLE_OPTION.  */

static bool
rs6000_handle_option (struct gcc_options *opts, struct gcc_options *opts_set,
		      const struct cl_decoded_option *decoded,
		      location_t loc)
{
  enum fpu_type_t fpu_type = FPU_NONE;
  char *p, *q;
  size_t code = decoded->opt_index;
  const char *arg = decoded->arg;
  int value = decoded->value;

  switch (code)
    {
    case OPT_mfull_toc:
      opts->x_rs6000_isa_flags &= ~OPTION_MASK_MINIMAL_TOC;
      opts->x_TARGET_NO_FP_IN_TOC = 0;
      opts->x_TARGET_NO_SUM_IN_TOC = 0;
      opts_set->x_rs6000_isa_flags |= OPTION_MASK_MINIMAL_TOC;
#ifdef TARGET_USES_SYSV4_OPT
      /* Note, V.4 no longer uses a normal TOC, so make -mfull-toc, be
	 just the same as -mminimal-toc.  */
      opts->x_rs6000_isa_flags |= OPTION_MASK_MINIMAL_TOC;
      opts_set->x_rs6000_isa_flags |= OPTION_MASK_MINIMAL_TOC;
#endif
      break;

#ifdef TARGET_USES_SYSV4_OPT
    case OPT_mtoc:
      /* Make -mtoc behave like -mminimal-toc.  */
      opts->x_rs6000_isa_flags |= OPTION_MASK_MINIMAL_TOC;
      opts_set->x_rs6000_isa_flags |= OPTION_MASK_MINIMAL_TOC;
      break;
#endif

#ifdef TARGET_USES_AIX64_OPT
    case OPT_maix64:
#else
    case OPT_m64:
#endif
      opts->x_rs6000_isa_flags |= OPTION_MASK_POWERPC64;
      opts->x_rs6000_isa_flags |= (~opts_set->x_rs6000_isa_flags
				   & OPTION_MASK_PPC_GFXOPT);
      opts_set->x_rs6000_isa_flags |= OPTION_MASK_POWERPC64;
      break;

#ifdef TARGET_USES_AIX64_OPT
    case OPT_maix32:
#else
    case OPT_m32:
#endif
      opts->x_rs6000_isa_flags &= ~OPTION_MASK_POWERPC64;
      opts_set->x_rs6000_isa_flags |= OPTION_MASK_POWERPC64;
      break;

    case OPT_mminimal_toc:
      if (value == 1)
	{
	  opts->x_TARGET_NO_FP_IN_TOC = 0;
	  opts->x_TARGET_NO_SUM_IN_TOC = 0;
	}
      break;

    case OPT_mpowerpc_gpopt:
    case OPT_mpowerpc_gfxopt:
      break;

    case OPT_mdebug_:
      p = ASTRDUP (arg);
      opts->x_rs6000_debug = 0;

      while ((q = strtok (p, ",")) != NULL)
	{
	  unsigned mask = 0;
	  bool invert;

	  p = NULL;
	  if (*q == '!')
	    {
	      invert = true;
	      q++;
	    }
	  else
	    invert = false;

	  if (! strcmp (q, "all"))
	    mask = MASK_DEBUG_ALL;
	  else if (! strcmp (q, "stack"))
	    mask = MASK_DEBUG_STACK;
	  else if (! strcmp (q, "arg"))
	    mask = MASK_DEBUG_ARG;
	  else if (! strcmp (q, "reg"))
	    mask = MASK_DEBUG_REG;
	  else if (! strcmp (q, "addr"))
	    mask = MASK_DEBUG_ADDR;
	  else if (! strcmp (q, "cost"))
	    mask = MASK_DEBUG_COST;
	  else if (! strcmp (q, "target"))
	    mask = MASK_DEBUG_TARGET;
	  else if (! strcmp (q, "builtin"))
	    mask = MASK_DEBUG_BUILTIN;
	  else
	    error_at (loc, "unknown -mdebug-%s switch", q);

	  if (invert)
	    opts->x_rs6000_debug &= ~mask;
	  else	
	    opts->x_rs6000_debug |= mask;
	}
      break;

#ifdef TARGET_USES_SYSV4_OPT
    case OPT_mrelocatable:
      if (value == 1)
	{
	  opts->x_rs6000_isa_flags |= OPTION_MASK_MINIMAL_TOC;
	  opts_set->x_rs6000_isa_flags |= OPTION_MASK_MINIMAL_TOC;
	  opts->x_TARGET_NO_FP_IN_TOC = 1;
	}
      break;

    case OPT_mrelocatable_lib:
      if (value == 1)
	{
	  opts->x_rs6000_isa_flags |= (OPTION_MASK_RELOCATABLE
				       | OPTION_MASK_MINIMAL_TOC);
	  opts_set->x_rs6000_isa_flags |= (OPTION_MASK_RELOCATABLE
					   | OPTION_MASK_MINIMAL_TOC);
	  opts->x_TARGET_NO_FP_IN_TOC = 1;
	}
      else
	{
	  opts->x_rs6000_isa_flags &= ~OPTION_MASK_RELOCATABLE;
	  opts_set->x_rs6000_isa_flags |= OPTION_MASK_RELOCATABLE;
	}
      break;
#endif

    case OPT_mlong_double_:
      if (value != 64 && value != 128)
	{
	  error_at (loc, "unknown switch -mlong-double-%s", arg);
	  opts->x_rs6000_long_double_type_size
	    = RS6000_DEFAULT_LONG_DOUBLE_SIZE;
	  return false;
	}
      break;

    case OPT_msingle_float:
      if (!TARGET_SINGLE_FPU) 
	warning_at (loc, 0,
		    "-msingle-float option equivalent to -mhard-float");
      /* -msingle-float implies -mno-double-float and TARGET_HARD_FLOAT. */
      opts->x_rs6000_double_float = 0;
      opts->x_rs6000_isa_flags &= ~OPTION_MASK_SOFT_FLOAT;
      opts_set->x_rs6000_isa_flags |= OPTION_MASK_SOFT_FLOAT;
      break;

    case OPT_mdouble_float:
      /* -mdouble-float implies -msingle-float and TARGET_HARD_FLOAT. */
      opts->x_rs6000_single_float = 1;
      opts->x_rs6000_isa_flags &= ~OPTION_MASK_SOFT_FLOAT;
      opts_set->x_rs6000_isa_flags |= OPTION_MASK_SOFT_FLOAT;
      break;

    case OPT_msimple_fpu:
      if (!TARGET_SINGLE_FPU) 
	warning_at (loc, 0, "-msimple-fpu option ignored");
      break;

    case OPT_mhard_float:
      /* -mhard_float implies -msingle-float and -mdouble-float. */
      opts->x_rs6000_single_float = opts->x_rs6000_double_float = 1;
      break;

    case OPT_msoft_float:
      /* -msoft_float implies -mnosingle-float and -mnodouble-float. */
      opts->x_rs6000_single_float = opts->x_rs6000_double_float = 0;
      break;

    case OPT_mfpu_:
      fpu_type = (enum fpu_type_t) value;
      if (fpu_type != FPU_NONE)
	{
	  /* If -mfpu is not none, then turn off SOFT_FLOAT, turn on
	     HARD_FLOAT. */
	  opts->x_rs6000_isa_flags &= ~OPTION_MASK_SOFT_FLOAT;
	  opts_set->x_rs6000_isa_flags |= OPTION_MASK_SOFT_FLOAT;
	  opts->x_rs6000_xilinx_fpu = 1;
	  if (fpu_type == FPU_SF_LITE || fpu_type == FPU_SF_FULL) 
	    opts->x_rs6000_single_float = 1;
	  if (fpu_type == FPU_DF_LITE || fpu_type == FPU_DF_FULL) 
	    opts->x_rs6000_single_float = opts->x_rs6000_double_float = 1;
	  if (fpu_type == FPU_SF_LITE || fpu_type == FPU_DF_LITE) 
	    opts->x_rs6000_simple_fpu = 1;
	}
      else
	{
	  /* -mfpu=none is equivalent to -msoft-float.  */
	  opts->x_rs6000_isa_flags |= OPTION_MASK_SOFT_FLOAT;
	  opts_set->x_rs6000_isa_flags |= OPTION_MASK_SOFT_FLOAT;
	  opts->x_rs6000_single_float = opts->x_rs6000_double_float = 0;
	}
      break;

    case OPT_mrecip:
      opts->x_rs6000_recip_name = (value) ? "default" : "none";
      break;
    }
  return true;
}

/* -fsplit-stack uses a field in the TCB, available with glibc-2.19.
   We also allow 2.18 because alignment padding guarantees that the
   space is available there too.  */

static bool
rs6000_supports_split_stack (bool report,
			     struct gcc_options *opts ATTRIBUTE_UNUSED)
{
#ifndef TARGET_GLIBC_MAJOR
#define TARGET_GLIBC_MAJOR 0
#endif
#ifndef TARGET_GLIBC_MINOR
#define TARGET_GLIBC_MINOR 0
#endif
  /* Note: Can't test DEFAULT_ABI here, it isn't set until later.  */
  if (TARGET_GLIBC_MAJOR * 1000 + TARGET_GLIBC_MINOR >= 2018
      && TARGET_64BIT
      && TARGET_ELF)
    return true;

  if (report)
    error ("%<-fsplit-stack%> currently only supported on PowerPC64 GNU/Linux with glibc-2.18 or later");
  return false;
}

#undef TARGET_HANDLE_OPTION
#define TARGET_HANDLE_OPTION rs6000_handle_option

#undef TARGET_OPTION_INIT_STRUCT
#define TARGET_OPTION_INIT_STRUCT rs6000_option_init_struct

#undef TARGET_OPTION_DEFAULT_PARAMS
#define TARGET_OPTION_DEFAULT_PARAMS rs6000_option_default_params

#undef TARGET_OPTION_OPTIMIZATION_TABLE
#define TARGET_OPTION_OPTIMIZATION_TABLE rs6000_option_optimization_table

#undef TARGET_SUPPORTS_SPLIT_STACK
#define TARGET_SUPPORTS_SPLIT_STACK rs6000_supports_split_stack

struct gcc_targetm_common targetm_common = TARGETM_COMMON_INITIALIZER;
Commit	Line	Data
677f3fa8	1	/* Common hooks for IBM RS/6000.
85ec4feb	2	Copyright (C) 1991-2018 Free Software Foundation, Inc.
677f3fa8 JM	3
	4	This file is part of GCC.
	5
	6	GCC is free software; you can redistribute it and/or modify it
	7	under the terms of the GNU General Public License as published
	8	by the Free Software Foundation; either version 3, or (at your
	9	option) any later version.
	10
	11	GCC is distributed in the hope that it will be useful, but WITHOUT
	12	ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
	13	or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
	14	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 "diagnostic-core.h"
	24	#include "tm.h"
	25	#include "common/common-target.h"
	26	#include "common/common-target-def.h"
	27	#include "opts.h"
	28	#include "flags.h"
4c77620d	29	#include "params.h"
677f3fa8 JM	30
	31	/* Implement TARGET_OPTION_OPTIMIZATION_TABLE. */
	32	static const struct default_options rs6000_option_optimization_table[] =
	33	{
35f4cbd4 PH	34	/* Enable -fsched-pressure for first pass instruction scheduling. */
35f4cbd4 PH	35	{ OPT_LEVELS_1_PLUS, OPT_fsched_pressure, NULL, 1 },
677f3fa8 JM	36	{ OPT_LEVELS_NONE, 0, NULL, 0 }
	37	};
	38
	39	/* Implement TARGET_OPTION_INIT_STRUCT. */
	40
	41	static void
	42	rs6000_option_init_struct (struct gcc_options *opts)
	43	{
	44	if (DEFAULT_ABI == ABI_DARWIN)
	45	/* The Darwin libraries never set errno, so we might as well
	46	avoid calling them when that's the only reason we would. */
	47	opts->x_flag_errno_math = 0;
	48
	49	/* Enable section anchors by default. */
	50	if (!TARGET_MACHO)
	51	opts->x_flag_section_anchors = 1;
	52	}
	53
4c77620d JM	54	/* Implement TARGET_OPTION_DEFAULT_PARAMS. */
	55
	56	static void
	57	rs6000_option_default_params (void)
	58	{
	59	/* Double growth factor to counter reduced min jump length. */
	60	set_default_param_value (PARAM_MAX_GROW_COPY_BB_INSNS, 16);
	61	}
	62
677f3fa8 JM	63	/* If not otherwise specified by a target, make 'long double' equivalent to
	64	'double'. */
	65
	66	#ifndef RS6000_DEFAULT_LONG_DOUBLE_SIZE
	67	#define RS6000_DEFAULT_LONG_DOUBLE_SIZE 64
	68	#endif
	69
	70	/* Implement TARGET_HANDLE_OPTION. */
	71
	72	static bool
	73	rs6000_handle_option (struct gcc_options opts, struct gcc_options opts_set,
	74	const struct cl_decoded_option *decoded,
	75	location_t loc)
	76	{
	77	enum fpu_type_t fpu_type = FPU_NONE;
	78	char p, q;
	79	size_t code = decoded->opt_index;
	80	const char *arg = decoded->arg;
	81	int value = decoded->value;
	82
	83	switch (code)
	84	{
677f3fa8	85	case OPT_mfull_toc:
4d967549	86	opts->x_rs6000_isa_flags &= ~OPTION_MASK_MINIMAL_TOC;
677f3fa8 JM	87	opts->x_TARGET_NO_FP_IN_TOC = 0;
677f3fa8 JM	88	opts->x_TARGET_NO_SUM_IN_TOC = 0;
4d967549	89	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_MINIMAL_TOC;
677f3fa8 JM	90	#ifdef TARGET_USES_SYSV4_OPT
	91	/* Note, V.4 no longer uses a normal TOC, so make -mfull-toc, be
	92	just the same as -mminimal-toc. */
4d967549 MM	93	opts->x_rs6000_isa_flags \|= OPTION_MASK_MINIMAL_TOC;
4d967549 MM	94	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_MINIMAL_TOC;
677f3fa8 JM	95	#endif
	96	break;
	97
	98	#ifdef TARGET_USES_SYSV4_OPT
	99	case OPT_mtoc:
	100	/* Make -mtoc behave like -mminimal-toc. */
4d967549 MM	101	opts->x_rs6000_isa_flags \|= OPTION_MASK_MINIMAL_TOC;
4d967549 MM	102	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_MINIMAL_TOC;
677f3fa8 JM	103	break;
	104	#endif
	105
	106	#ifdef TARGET_USES_AIX64_OPT
	107	case OPT_maix64:
	108	#else
	109	case OPT_m64:
	110	#endif
4d967549 MM	111	opts->x_rs6000_isa_flags \|= OPTION_MASK_POWERPC64;
	112	opts->x_rs6000_isa_flags \|= (~opts_set->x_rs6000_isa_flags
	113	& OPTION_MASK_PPC_GFXOPT);
	114	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_POWERPC64;
677f3fa8 JM	115	break;
	116
	117	#ifdef TARGET_USES_AIX64_OPT
	118	case OPT_maix32:
	119	#else
	120	case OPT_m32:
	121	#endif
4d967549 MM	122	opts->x_rs6000_isa_flags &= ~OPTION_MASK_POWERPC64;
4d967549 MM	123	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_POWERPC64;
677f3fa8 JM	124	break;
	125
	126	case OPT_mminimal_toc:
	127	if (value == 1)
	128	{
	129	opts->x_TARGET_NO_FP_IN_TOC = 0;
	130	opts->x_TARGET_NO_SUM_IN_TOC = 0;
	131	}
	132	break;
	133
677f3fa8 JM	134	case OPT_mpowerpc_gpopt:
677f3fa8 JM	135	case OPT_mpowerpc_gfxopt:
677f3fa8 JM	136	break;
	137
	138	case OPT_mdebug_:
	139	p = ASTRDUP (arg);
	140	opts->x_rs6000_debug = 0;
	141
	142	while ((q = strtok (p, ",")) != NULL)
	143	{
	144	unsigned mask = 0;
	145	bool invert;
	146
	147	p = NULL;
	148	if (*q == '!')
	149	{
	150	invert = true;
	151	q++;
	152	}
	153	else
	154	invert = false;
	155
	156	if (! strcmp (q, "all"))
	157	mask = MASK_DEBUG_ALL;
	158	else if (! strcmp (q, "stack"))
	159	mask = MASK_DEBUG_STACK;
	160	else if (! strcmp (q, "arg"))
	161	mask = MASK_DEBUG_ARG;
	162	else if (! strcmp (q, "reg"))
	163	mask = MASK_DEBUG_REG;
	164	else if (! strcmp (q, "addr"))
	165	mask = MASK_DEBUG_ADDR;
	166	else if (! strcmp (q, "cost"))
	167	mask = MASK_DEBUG_COST;
	168	else if (! strcmp (q, "target"))
	169	mask = MASK_DEBUG_TARGET;
7fa14a01 MM	170	else if (! strcmp (q, "builtin"))
7fa14a01 MM	171	mask = MASK_DEBUG_BUILTIN;
677f3fa8 JM	172	else
	173	error_at (loc, "unknown -mdebug-%s switch", q);
	174
	175	if (invert)
	176	opts->x_rs6000_debug &= ~mask;
	177	else
	178	opts->x_rs6000_debug \|= mask;
	179	}
	180	break;
	181
	182	#ifdef TARGET_USES_SYSV4_OPT
	183	case OPT_mrelocatable:
	184	if (value == 1)
	185	{
4d967549 MM	186	opts->x_rs6000_isa_flags \|= OPTION_MASK_MINIMAL_TOC;
4d967549 MM	187	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_MINIMAL_TOC;
677f3fa8 JM	188	opts->x_TARGET_NO_FP_IN_TOC = 1;
	189	}
	190	break;
	191
	192	case OPT_mrelocatable_lib:
	193	if (value == 1)
	194	{
4d967549 MM	195	opts->x_rs6000_isa_flags \|= (OPTION_MASK_RELOCATABLE
	196	\| OPTION_MASK_MINIMAL_TOC);
	197	opts_set->x_rs6000_isa_flags \|= (OPTION_MASK_RELOCATABLE
	198	\| OPTION_MASK_MINIMAL_TOC);
677f3fa8 JM	199	opts->x_TARGET_NO_FP_IN_TOC = 1;
	200	}
	201	else
	202	{
4d967549 MM	203	opts->x_rs6000_isa_flags &= ~OPTION_MASK_RELOCATABLE;
4d967549 MM	204	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_RELOCATABLE;
677f3fa8 JM	205	}
	206	break;
	207	#endif
	208
677f3fa8 JM	209	case OPT_mlong_double_:
	210	if (value != 64 && value != 128)
	211	{
	212	error_at (loc, "unknown switch -mlong-double-%s", arg);
	213	opts->x_rs6000_long_double_type_size
	214	= RS6000_DEFAULT_LONG_DOUBLE_SIZE;
	215	return false;
	216	}
	217	break;
	218
	219	case OPT_msingle_float:
	220	if (!TARGET_SINGLE_FPU)
	221	warning_at (loc, 0,
	222	"-msingle-float option equivalent to -mhard-float");
	223	/* -msingle-float implies -mno-double-float and TARGET_HARD_FLOAT. */
	224	opts->x_rs6000_double_float = 0;
4d967549 MM	225	opts->x_rs6000_isa_flags &= ~OPTION_MASK_SOFT_FLOAT;
4d967549 MM	226	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_SOFT_FLOAT;
677f3fa8 JM	227	break;
	228
	229	case OPT_mdouble_float:
	230	/* -mdouble-float implies -msingle-float and TARGET_HARD_FLOAT. */
	231	opts->x_rs6000_single_float = 1;
4d967549 MM	232	opts->x_rs6000_isa_flags &= ~OPTION_MASK_SOFT_FLOAT;
4d967549 MM	233	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_SOFT_FLOAT;
677f3fa8 JM	234	break;
	235
	236	case OPT_msimple_fpu:
	237	if (!TARGET_SINGLE_FPU)
	238	warning_at (loc, 0, "-msimple-fpu option ignored");
	239	break;
	240
	241	case OPT_mhard_float:
	242	/* -mhard_float implies -msingle-float and -mdouble-float. */
	243	opts->x_rs6000_single_float = opts->x_rs6000_double_float = 1;
	244	break;
	245
	246	case OPT_msoft_float:
	247	/* -msoft_float implies -mnosingle-float and -mnodouble-float. */
	248	opts->x_rs6000_single_float = opts->x_rs6000_double_float = 0;
	249	break;
	250
	251	case OPT_mfpu_:
	252	fpu_type = (enum fpu_type_t) value;
	253	if (fpu_type != FPU_NONE)
	254	{
	255	/* If -mfpu is not none, then turn off SOFT_FLOAT, turn on
	256	HARD_FLOAT. */
4d967549 MM	257	opts->x_rs6000_isa_flags &= ~OPTION_MASK_SOFT_FLOAT;
4d967549 MM	258	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_SOFT_FLOAT;
677f3fa8 JM	259	opts->x_rs6000_xilinx_fpu = 1;
	260	if (fpu_type == FPU_SF_LITE \|\| fpu_type == FPU_SF_FULL)
	261	opts->x_rs6000_single_float = 1;
	262	if (fpu_type == FPU_DF_LITE \|\| fpu_type == FPU_DF_FULL)
	263	opts->x_rs6000_single_float = opts->x_rs6000_double_float = 1;
	264	if (fpu_type == FPU_SF_LITE \|\| fpu_type == FPU_DF_LITE)
	265	opts->x_rs6000_simple_fpu = 1;
	266	}
	267	else
	268	{
	269	/* -mfpu=none is equivalent to -msoft-float. */
4d967549 MM	270	opts->x_rs6000_isa_flags \|= OPTION_MASK_SOFT_FLOAT;
4d967549 MM	271	opts_set->x_rs6000_isa_flags \|= OPTION_MASK_SOFT_FLOAT;
677f3fa8 JM	272	opts->x_rs6000_single_float = opts->x_rs6000_double_float = 0;
	273	}
	274	break;
	275
	276	case OPT_mrecip:
	277	opts->x_rs6000_recip_name = (value) ? "default" : "none";
	278	break;
	279	}
	280	return true;
	281	}
	282
0f0fd745 AM	283	/* -fsplit-stack uses a field in the TCB, available with glibc-2.19.
	284	We also allow 2.18 because alignment padding guarantees that the
	285	space is available there too. */
	286
	287	static bool
	288	rs6000_supports_split_stack (bool report,
	289	struct gcc_options *opts ATTRIBUTE_UNUSED)
	290	{
	291	#ifndef TARGET_GLIBC_MAJOR
	292	#define TARGET_GLIBC_MAJOR 0
	293	#endif
	294	#ifndef TARGET_GLIBC_MINOR
	295	#define TARGET_GLIBC_MINOR 0
	296	#endif
	297	/* Note: Can't test DEFAULT_ABI here, it isn't set until later. */
	298	if (TARGET_GLIBC_MAJOR * 1000 + TARGET_GLIBC_MINOR >= 2018
	299	&& TARGET_64BIT
	300	&& TARGET_ELF)
	301	return true;
	302
	303	if (report)
	304	error ("%<-fsplit-stack%> currently only supported on PowerPC64 GNU/Linux with glibc-2.18 or later");
	305	return false;
	306	}
	307
677f3fa8 JM	308	#undef TARGET_HANDLE_OPTION
	309	#define TARGET_HANDLE_OPTION rs6000_handle_option
	310
	311	#undef TARGET_OPTION_INIT_STRUCT
	312	#define TARGET_OPTION_INIT_STRUCT rs6000_option_init_struct
	313
4c77620d JM	314	#undef TARGET_OPTION_DEFAULT_PARAMS
	315	#define TARGET_OPTION_DEFAULT_PARAMS rs6000_option_default_params
	316
677f3fa8 JM	317	#undef TARGET_OPTION_OPTIMIZATION_TABLE
	318	#define TARGET_OPTION_OPTIMIZATION_TABLE rs6000_option_optimization_table
	319
0f0fd745 AM	320	#undef TARGET_SUPPORTS_SPLIT_STACK
	321	#define TARGET_SUPPORTS_SPLIT_STACK rs6000_supports_split_stack
	322
677f3fa8	323	struct gcc_targetm_common targetm_common = TARGETM_COMMON_INITIALIZER;