OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [c-opts.c] - Diff between revs 38 and 154

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 38 Rev 154
/* C/ObjC/C++ command line option handling.
/* C/ObjC/C++ command line option handling.
   Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007
   Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
   Contributed by Neil Booth.
   Contributed by Neil Booth.
 
 
This file is part of GCC.
This file is part of GCC.
 
 
GCC is free software; you can redistribute it and/or modify it under
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
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 3, or (at your option) any later
Software Foundation; either version 3, or (at your option) any later
version.
version.
 
 
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.
for more details.
 
 
You should have received a copy of the GNU General Public License
You should have received a copy of the GNU General Public License
along with GCC; see the file COPYING3.  If not see
along with GCC; see the file COPYING3.  If not see
<http://www.gnu.org/licenses/>.  */
<http://www.gnu.org/licenses/>.  */
 
 
#include "config.h"
#include "config.h"
#include "system.h"
#include "system.h"
#include "coretypes.h"
#include "coretypes.h"
#include "tm.h"
#include "tm.h"
#include "tree.h"
#include "tree.h"
#include "c-common.h"
#include "c-common.h"
#include "c-pragma.h"
#include "c-pragma.h"
#include "flags.h"
#include "flags.h"
#include "toplev.h"
#include "toplev.h"
#include "langhooks.h"
#include "langhooks.h"
#include "tree-inline.h"
#include "tree-inline.h"
#include "diagnostic.h"
#include "diagnostic.h"
#include "intl.h"
#include "intl.h"
#include "cppdefault.h"
#include "cppdefault.h"
#include "c-incpath.h"
#include "c-incpath.h"
#include "debug.h"              /* For debug_hooks.  */
#include "debug.h"              /* For debug_hooks.  */
#include "opts.h"
#include "opts.h"
#include "options.h"
#include "options.h"
#include "mkdeps.h"
#include "mkdeps.h"
 
 
#ifndef DOLLARS_IN_IDENTIFIERS
#ifndef DOLLARS_IN_IDENTIFIERS
# define DOLLARS_IN_IDENTIFIERS true
# define DOLLARS_IN_IDENTIFIERS true
#endif
#endif
 
 
#ifndef TARGET_SYSTEM_ROOT
#ifndef TARGET_SYSTEM_ROOT
# define TARGET_SYSTEM_ROOT NULL
# define TARGET_SYSTEM_ROOT NULL
#endif
#endif
 
 
#ifndef TARGET_OPTF
#ifndef TARGET_OPTF
#define TARGET_OPTF(ARG)
#define TARGET_OPTF(ARG)
#endif
#endif
 
 
/* CPP's options.  */
/* CPP's options.  */
static cpp_options *cpp_opts;
static cpp_options *cpp_opts;
 
 
/* Input filename.  */
/* Input filename.  */
static const char *this_input_filename;
static const char *this_input_filename;
 
 
/* Filename and stream for preprocessed output.  */
/* Filename and stream for preprocessed output.  */
static const char *out_fname;
static const char *out_fname;
static FILE *out_stream;
static FILE *out_stream;
 
 
/* Append dependencies to deps_file.  */
/* Append dependencies to deps_file.  */
static bool deps_append;
static bool deps_append;
 
 
/* If dependency switches (-MF etc.) have been given.  */
/* If dependency switches (-MF etc.) have been given.  */
static bool deps_seen;
static bool deps_seen;
 
 
/* If -v seen.  */
/* If -v seen.  */
static bool verbose;
static bool verbose;
 
 
/* If -lang-fortran seen.  */
/* If -lang-fortran seen.  */
static bool lang_fortran = false;
static bool lang_fortran = false;
 
 
/* Dependency output file.  */
/* Dependency output file.  */
static const char *deps_file;
static const char *deps_file;
 
 
/* The prefix given by -iprefix, if any.  */
/* The prefix given by -iprefix, if any.  */
static const char *iprefix;
static const char *iprefix;
 
 
/* The multilib directory given by -imultilib, if any.  */
/* The multilib directory given by -imultilib, if any.  */
static const char *imultilib;
static const char *imultilib;
 
 
/* The system root, if any.  Overridden by -isysroot.  */
/* The system root, if any.  Overridden by -isysroot.  */
static const char *sysroot = TARGET_SYSTEM_ROOT;
static const char *sysroot = TARGET_SYSTEM_ROOT;
 
 
/* Zero disables all standard directories for headers.  */
/* Zero disables all standard directories for headers.  */
static bool std_inc = true;
static bool std_inc = true;
 
 
/* Zero disables the C++-specific standard directories for headers.  */
/* Zero disables the C++-specific standard directories for headers.  */
static bool std_cxx_inc = true;
static bool std_cxx_inc = true;
 
 
/* If the quote chain has been split by -I-.  */
/* If the quote chain has been split by -I-.  */
static bool quote_chain_split;
static bool quote_chain_split;
 
 
/* If -Wunused-macros.  */
/* If -Wunused-macros.  */
static bool warn_unused_macros;
static bool warn_unused_macros;
 
 
/* If -Wvariadic-macros.  */
/* If -Wvariadic-macros.  */
static bool warn_variadic_macros = true;
static bool warn_variadic_macros = true;
 
 
/* Number of deferred options.  */
/* Number of deferred options.  */
static size_t deferred_count;
static size_t deferred_count;
 
 
/* Number of deferred options scanned for -include.  */
/* Number of deferred options scanned for -include.  */
static size_t include_cursor;
static size_t include_cursor;
 
 
static void set_Wimplicit (int);
static void set_Wimplicit (int);
static void handle_OPT_d (const char *);
static void handle_OPT_d (const char *);
static void set_std_cxx98 (int);
static void set_std_cxx98 (int);
static void set_std_c89 (int, int);
static void set_std_c89 (int, int);
static void set_std_c99 (int);
static void set_std_c99 (int);
static void check_deps_environment_vars (void);
static void check_deps_environment_vars (void);
static void handle_deferred_opts (void);
static void handle_deferred_opts (void);
static void sanitize_cpp_opts (void);
static void sanitize_cpp_opts (void);
static void add_prefixed_path (const char *, size_t);
static void add_prefixed_path (const char *, size_t);
static void push_command_line_include (void);
static void push_command_line_include (void);
static void cb_file_change (cpp_reader *, const struct line_map *);
static void cb_file_change (cpp_reader *, const struct line_map *);
static void cb_dir_change (cpp_reader *, const char *);
static void cb_dir_change (cpp_reader *, const char *);
static void finish_options (void);
static void finish_options (void);
 
 
#ifndef STDC_0_IN_SYSTEM_HEADERS
#ifndef STDC_0_IN_SYSTEM_HEADERS
#define STDC_0_IN_SYSTEM_HEADERS 0
#define STDC_0_IN_SYSTEM_HEADERS 0
#endif
#endif
 
 
/* Holds switches parsed by c_common_handle_option (), but whose
/* Holds switches parsed by c_common_handle_option (), but whose
   handling is deferred to c_common_post_options ().  */
   handling is deferred to c_common_post_options ().  */
static void defer_opt (enum opt_code, const char *);
static void defer_opt (enum opt_code, const char *);
static struct deferred_opt
static struct deferred_opt
{
{
  enum opt_code code;
  enum opt_code code;
  const char *arg;
  const char *arg;
} *deferred_opts;
} *deferred_opts;
 
 
/* Complain that switch CODE expects an argument but none was
/* Complain that switch CODE expects an argument but none was
   provided.  OPT was the command-line option.  Return FALSE to get
   provided.  OPT was the command-line option.  Return FALSE to get
   the default message in opts.c, TRUE if we provide a specialized
   the default message in opts.c, TRUE if we provide a specialized
   one.  */
   one.  */
bool
bool
c_common_missing_argument (const char *opt, size_t code)
c_common_missing_argument (const char *opt, size_t code)
{
{
  switch (code)
  switch (code)
    {
    {
    default:
    default:
      /* Pick up the default message.  */
      /* Pick up the default message.  */
      return false;
      return false;
 
 
    case OPT_fconstant_string_class_:
    case OPT_fconstant_string_class_:
      error ("no class name specified with %qs", opt);
      error ("no class name specified with %qs", opt);
      break;
      break;
 
 
    case OPT_A:
    case OPT_A:
      error ("assertion missing after %qs", opt);
      error ("assertion missing after %qs", opt);
      break;
      break;
 
 
    case OPT_D:
    case OPT_D:
    case OPT_U:
    case OPT_U:
      error ("macro name missing after %qs", opt);
      error ("macro name missing after %qs", opt);
      break;
      break;
 
 
    case OPT_F:
    case OPT_F:
    case OPT_I:
    case OPT_I:
    case OPT_idirafter:
    case OPT_idirafter:
    case OPT_isysroot:
    case OPT_isysroot:
    case OPT_isystem:
    case OPT_isystem:
    case OPT_iquote:
    case OPT_iquote:
      error ("missing path after %qs", opt);
      error ("missing path after %qs", opt);
      break;
      break;
 
 
    case OPT_MF:
    case OPT_MF:
    case OPT_MD:
    case OPT_MD:
    case OPT_MMD:
    case OPT_MMD:
    case OPT_include:
    case OPT_include:
    case OPT_imacros:
    case OPT_imacros:
    case OPT_o:
    case OPT_o:
      error ("missing filename after %qs", opt);
      error ("missing filename after %qs", opt);
      break;
      break;
 
 
    case OPT_MQ:
    case OPT_MQ:
    case OPT_MT:
    case OPT_MT:
      error ("missing makefile target after %qs", opt);
      error ("missing makefile target after %qs", opt);
      break;
      break;
    }
    }
 
 
  return true;
  return true;
}
}
 
 
/* Defer option CODE with argument ARG.  */
/* Defer option CODE with argument ARG.  */
static void
static void
defer_opt (enum opt_code code, const char *arg)
defer_opt (enum opt_code code, const char *arg)
{
{
  deferred_opts[deferred_count].code = code;
  deferred_opts[deferred_count].code = code;
  deferred_opts[deferred_count].arg = arg;
  deferred_opts[deferred_count].arg = arg;
  deferred_count++;
  deferred_count++;
}
}
 
 
/* Common initialization before parsing options.  */
/* Common initialization before parsing options.  */
unsigned int
unsigned int
c_common_init_options (unsigned int argc, const char **argv)
c_common_init_options (unsigned int argc, const char **argv)
{
{
  static const unsigned int lang_flags[] = {CL_C, CL_ObjC, CL_CXX, CL_ObjCXX};
  static const unsigned int lang_flags[] = {CL_C, CL_ObjC, CL_CXX, CL_ObjCXX};
  unsigned int i, result;
  unsigned int i, result;
 
 
  /* This is conditionalized only because that is the way the front
  /* This is conditionalized only because that is the way the front
     ends used to do it.  Maybe this should be unconditional?  */
     ends used to do it.  Maybe this should be unconditional?  */
  if (c_dialect_cxx ())
  if (c_dialect_cxx ())
    {
    {
      /* By default wrap lines at 80 characters.  Is getenv
      /* By default wrap lines at 80 characters.  Is getenv
         ("COLUMNS") preferable?  */
         ("COLUMNS") preferable?  */
      diagnostic_line_cutoff (global_dc) = 80;
      diagnostic_line_cutoff (global_dc) = 80;
      /* By default, emit location information once for every
      /* By default, emit location information once for every
         diagnostic message.  */
         diagnostic message.  */
      diagnostic_prefixing_rule (global_dc) = DIAGNOSTICS_SHOW_PREFIX_ONCE;
      diagnostic_prefixing_rule (global_dc) = DIAGNOSTICS_SHOW_PREFIX_ONCE;
    }
    }
 
 
  parse_in = cpp_create_reader (c_dialect_cxx () ? CLK_GNUCXX: CLK_GNUC89,
  parse_in = cpp_create_reader (c_dialect_cxx () ? CLK_GNUCXX: CLK_GNUC89,
                                ident_hash, &line_table);
                                ident_hash, &line_table);
 
 
  cpp_opts = cpp_get_options (parse_in);
  cpp_opts = cpp_get_options (parse_in);
  cpp_opts->dollars_in_ident = DOLLARS_IN_IDENTIFIERS;
  cpp_opts->dollars_in_ident = DOLLARS_IN_IDENTIFIERS;
  cpp_opts->objc = c_dialect_objc ();
  cpp_opts->objc = c_dialect_objc ();
 
 
  /* Reset to avoid warnings on internal definitions.  We set it just
  /* Reset to avoid warnings on internal definitions.  We set it just
     before passing on command-line options to cpplib.  */
     before passing on command-line options to cpplib.  */
  cpp_opts->warn_dollars = 0;
  cpp_opts->warn_dollars = 0;
 
 
  flag_exceptions = c_dialect_cxx ();
  flag_exceptions = c_dialect_cxx ();
  warn_pointer_arith = c_dialect_cxx ();
  warn_pointer_arith = c_dialect_cxx ();
  warn_write_strings = c_dialect_cxx();
  warn_write_strings = c_dialect_cxx();
 
 
  deferred_opts = XNEWVEC (struct deferred_opt, argc);
  deferred_opts = XNEWVEC (struct deferred_opt, argc);
 
 
  result = lang_flags[c_language];
  result = lang_flags[c_language];
 
 
  if (c_language == clk_c)
  if (c_language == clk_c)
    {
    {
      /* If preprocessing assembly language, accept any of the C-family
      /* If preprocessing assembly language, accept any of the C-family
         front end options since the driver may pass them through.  */
         front end options since the driver may pass them through.  */
      for (i = 1; i < argc; i++)
      for (i = 1; i < argc; i++)
        if (! strcmp (argv[i], "-lang-asm"))
        if (! strcmp (argv[i], "-lang-asm"))
          {
          {
            result |= CL_C | CL_ObjC | CL_CXX | CL_ObjCXX;
            result |= CL_C | CL_ObjC | CL_CXX | CL_ObjCXX;
            break;
            break;
          }
          }
 
 
#ifdef CL_Fortran
#ifdef CL_Fortran
      for (i = 1; i < argc; i++)
      for (i = 1; i < argc; i++)
        if (! strcmp (argv[i], "-lang-fortran"))
        if (! strcmp (argv[i], "-lang-fortran"))
        {
        {
            result |= CL_Fortran;
            result |= CL_Fortran;
            break;
            break;
        }
        }
#endif
#endif
    }
    }
 
 
  return result;
  return result;
}
}
 
 
/* Handle switch SCODE with argument ARG.  VALUE is true, unless no-
/* Handle switch SCODE with argument ARG.  VALUE is true, unless no-
   form of an -f or -W option was given.  Returns 0 if the switch was
   form of an -f or -W option was given.  Returns 0 if the switch was
   invalid, a negative number to prevent language-independent
   invalid, a negative number to prevent language-independent
   processing in toplev.c (a hack necessary for the short-term).  */
   processing in toplev.c (a hack necessary for the short-term).  */
int
int
c_common_handle_option (size_t scode, const char *arg, int value)
c_common_handle_option (size_t scode, const char *arg, int value)
{
{
  const struct cl_option *option = &cl_options[scode];
  const struct cl_option *option = &cl_options[scode];
  enum opt_code code = (enum opt_code) scode;
  enum opt_code code = (enum opt_code) scode;
  int result = 1;
  int result = 1;
 
 
  /* Prevent resetting the language standard to a C dialect when the driver
  /* Prevent resetting the language standard to a C dialect when the driver
     has already determined that we're looking at assembler input.  */
     has already determined that we're looking at assembler input.  */
  bool preprocessing_asm_p = (cpp_get_options (parse_in)->lang == CLK_ASM);
  bool preprocessing_asm_p = (cpp_get_options (parse_in)->lang == CLK_ASM);
 
 
  switch (code)
  switch (code)
    {
    {
    default:
    default:
      if (cl_options[code].flags & (CL_C | CL_CXX | CL_ObjC | CL_ObjCXX))
      if (cl_options[code].flags & (CL_C | CL_CXX | CL_ObjC | CL_ObjCXX))
        break;
        break;
#ifdef CL_Fortran
#ifdef CL_Fortran
      if (lang_fortran && (cl_options[code].flags & (CL_Fortran)))
      if (lang_fortran && (cl_options[code].flags & (CL_Fortran)))
        break;
        break;
#endif
#endif
      result = 0;
      result = 0;
      break;
      break;
 
 
    case OPT__output_pch_:
    case OPT__output_pch_:
      pch_file = arg;
      pch_file = arg;
      break;
      break;
 
 
    case OPT_A:
    case OPT_A:
      defer_opt (code, arg);
      defer_opt (code, arg);
      break;
      break;
 
 
    case OPT_C:
    case OPT_C:
      cpp_opts->discard_comments = 0;
      cpp_opts->discard_comments = 0;
      break;
      break;
 
 
    case OPT_CC:
    case OPT_CC:
      cpp_opts->discard_comments = 0;
      cpp_opts->discard_comments = 0;
      cpp_opts->discard_comments_in_macro_exp = 0;
      cpp_opts->discard_comments_in_macro_exp = 0;
      break;
      break;
 
 
    case OPT_D:
    case OPT_D:
      defer_opt (code, arg);
      defer_opt (code, arg);
      break;
      break;
 
 
    case OPT_E:
    case OPT_E:
      flag_preprocess_only = 1;
      flag_preprocess_only = 1;
      break;
      break;
 
 
    case OPT_H:
    case OPT_H:
      cpp_opts->print_include_names = 1;
      cpp_opts->print_include_names = 1;
      break;
      break;
 
 
    case OPT_F:
    case OPT_F:
      TARGET_OPTF (xstrdup (arg));
      TARGET_OPTF (xstrdup (arg));
      break;
      break;
 
 
    case OPT_I:
    case OPT_I:
      if (strcmp (arg, "-"))
      if (strcmp (arg, "-"))
        add_path (xstrdup (arg), BRACKET, 0, true);
        add_path (xstrdup (arg), BRACKET, 0, true);
      else
      else
        {
        {
          if (quote_chain_split)
          if (quote_chain_split)
            error ("-I- specified twice");
            error ("-I- specified twice");
          quote_chain_split = true;
          quote_chain_split = true;
          split_quote_chain ();
          split_quote_chain ();
          inform ("obsolete option -I- used, please use -iquote instead");
          inform ("obsolete option -I- used, please use -iquote instead");
        }
        }
      break;
      break;
 
 
    case OPT_M:
    case OPT_M:
    case OPT_MM:
    case OPT_MM:
      /* When doing dependencies with -M or -MM, suppress normal
      /* When doing dependencies with -M or -MM, suppress normal
         preprocessed output, but still do -dM etc. as software
         preprocessed output, but still do -dM etc. as software
         depends on this.  Preprocessed output does occur if -MD, -MMD
         depends on this.  Preprocessed output does occur if -MD, -MMD
         or environment var dependency generation is used.  */
         or environment var dependency generation is used.  */
      cpp_opts->deps.style = (code == OPT_M ? DEPS_SYSTEM: DEPS_USER);
      cpp_opts->deps.style = (code == OPT_M ? DEPS_SYSTEM: DEPS_USER);
      flag_no_output = 1;
      flag_no_output = 1;
      cpp_opts->inhibit_warnings = 1;
      cpp_opts->inhibit_warnings = 1;
      break;
      break;
 
 
    case OPT_MD:
    case OPT_MD:
    case OPT_MMD:
    case OPT_MMD:
      cpp_opts->deps.style = (code == OPT_MD ? DEPS_SYSTEM: DEPS_USER);
      cpp_opts->deps.style = (code == OPT_MD ? DEPS_SYSTEM: DEPS_USER);
      deps_file = arg;
      deps_file = arg;
      break;
      break;
 
 
    case OPT_MF:
    case OPT_MF:
      deps_seen = true;
      deps_seen = true;
      deps_file = arg;
      deps_file = arg;
      break;
      break;
 
 
    case OPT_MG:
    case OPT_MG:
      deps_seen = true;
      deps_seen = true;
      cpp_opts->deps.missing_files = true;
      cpp_opts->deps.missing_files = true;
      break;
      break;
 
 
    case OPT_MP:
    case OPT_MP:
      deps_seen = true;
      deps_seen = true;
      cpp_opts->deps.phony_targets = true;
      cpp_opts->deps.phony_targets = true;
      break;
      break;
 
 
    case OPT_MQ:
    case OPT_MQ:
    case OPT_MT:
    case OPT_MT:
      deps_seen = true;
      deps_seen = true;
      defer_opt (code, arg);
      defer_opt (code, arg);
      break;
      break;
 
 
    case OPT_P:
    case OPT_P:
      flag_no_line_commands = 1;
      flag_no_line_commands = 1;
      break;
      break;
 
 
    case OPT_fworking_directory:
    case OPT_fworking_directory:
      flag_working_directory = value;
      flag_working_directory = value;
      break;
      break;
 
 
    case OPT_U:
    case OPT_U:
      defer_opt (code, arg);
      defer_opt (code, arg);
      break;
      break;
 
 
    case OPT_Wall:
    case OPT_Wall:
      set_Wunused (value);
      set_Wunused (value);
      set_Wformat (value);
      set_Wformat (value);
      set_Wimplicit (value);
      set_Wimplicit (value);
      warn_char_subscripts = value;
      warn_char_subscripts = value;
      warn_missing_braces = value;
      warn_missing_braces = value;
      warn_parentheses = value;
      warn_parentheses = value;
      warn_return_type = value;
      warn_return_type = value;
      warn_sequence_point = value;      /* Was C only.  */
      warn_sequence_point = value;      /* Was C only.  */
      if (c_dialect_cxx ())
      if (c_dialect_cxx ())
        warn_sign_compare = value;
        warn_sign_compare = value;
      warn_switch = value;
      warn_switch = value;
      warn_strict_aliasing = value;
      warn_strict_aliasing = value;
      warn_strict_overflow = value;
      warn_strict_overflow = value;
      warn_address = value;
      warn_address = value;
 
 
      /* Only warn about unknown pragmas that are not in system
      /* Only warn about unknown pragmas that are not in system
         headers.  */
         headers.  */
      warn_unknown_pragmas = value;
      warn_unknown_pragmas = value;
 
 
      /* We save the value of warn_uninitialized, since if they put
      /* We save the value of warn_uninitialized, since if they put
         -Wuninitialized on the command line, we need to generate a
         -Wuninitialized on the command line, we need to generate a
         warning about not using it without also specifying -O.  */
         warning about not using it without also specifying -O.  */
      if (warn_uninitialized != 1)
      if (warn_uninitialized != 1)
        warn_uninitialized = (value ? 2 : 0);
        warn_uninitialized = (value ? 2 : 0);
 
 
      if (!c_dialect_cxx ())
      if (!c_dialect_cxx ())
        /* We set this to 2 here, but 1 in -Wmain, so -ffreestanding
        /* We set this to 2 here, but 1 in -Wmain, so -ffreestanding
           can turn it off only if it's not explicit.  */
           can turn it off only if it's not explicit.  */
        warn_main = value * 2;
        warn_main = value * 2;
      else
      else
        {
        {
          /* C++-specific warnings.  */
          /* C++-specific warnings.  */
          warn_reorder = value;
          warn_reorder = value;
          warn_nontemplate_friend = value;
          warn_nontemplate_friend = value;
        }
        }
 
 
      cpp_opts->warn_trigraphs = value;
      cpp_opts->warn_trigraphs = value;
      cpp_opts->warn_comments = value;
      cpp_opts->warn_comments = value;
      cpp_opts->warn_num_sign_change = value;
      cpp_opts->warn_num_sign_change = value;
      cpp_opts->warn_multichar = value; /* Was C++ only.  */
      cpp_opts->warn_multichar = value; /* Was C++ only.  */
 
 
      if (warn_pointer_sign == -1)
      if (warn_pointer_sign == -1)
        warn_pointer_sign = 1;
        warn_pointer_sign = 1;
      break;
      break;
 
 
    case OPT_Wcomment:
    case OPT_Wcomment:
    case OPT_Wcomments:
    case OPT_Wcomments:
      cpp_opts->warn_comments = value;
      cpp_opts->warn_comments = value;
      break;
      break;
 
 
    case OPT_Wdeprecated:
    case OPT_Wdeprecated:
      cpp_opts->warn_deprecated = value;
      cpp_opts->warn_deprecated = value;
      break;
      break;
 
 
    case OPT_Wendif_labels:
    case OPT_Wendif_labels:
      cpp_opts->warn_endif_labels = value;
      cpp_opts->warn_endif_labels = value;
      break;
      break;
 
 
    case OPT_Werror:
    case OPT_Werror:
      cpp_opts->warnings_are_errors = value;
      cpp_opts->warnings_are_errors = value;
      global_dc->warning_as_error_requested = value;
      global_dc->warning_as_error_requested = value;
      break;
      break;
 
 
    case OPT_Werror_implicit_function_declaration:
    case OPT_Werror_implicit_function_declaration:
      mesg_implicit_function_declaration = 2;
      mesg_implicit_function_declaration = 2;
      break;
      break;
 
 
    case OPT_Wformat:
    case OPT_Wformat:
      set_Wformat (value);
      set_Wformat (value);
      break;
      break;
 
 
    case OPT_Wformat_:
    case OPT_Wformat_:
      set_Wformat (atoi (arg));
      set_Wformat (atoi (arg));
      break;
      break;
 
 
    case OPT_Wimplicit:
    case OPT_Wimplicit:
      set_Wimplicit (value);
      set_Wimplicit (value);
      break;
      break;
 
 
    case OPT_Wimport:
    case OPT_Wimport:
      /* Silently ignore for now.  */
      /* Silently ignore for now.  */
      break;
      break;
 
 
    case OPT_Winvalid_pch:
    case OPT_Winvalid_pch:
      cpp_opts->warn_invalid_pch = value;
      cpp_opts->warn_invalid_pch = value;
      break;
      break;
 
 
    case OPT_Wmain:
    case OPT_Wmain:
      if (value)
      if (value)
        warn_main = 1;
        warn_main = 1;
      else
      else
        warn_main = -1;
        warn_main = -1;
      break;
      break;
 
 
    case OPT_Wmissing_include_dirs:
    case OPT_Wmissing_include_dirs:
      cpp_opts->warn_missing_include_dirs = value;
      cpp_opts->warn_missing_include_dirs = value;
      break;
      break;
 
 
    case OPT_Wmultichar:
    case OPT_Wmultichar:
      cpp_opts->warn_multichar = value;
      cpp_opts->warn_multichar = value;
      break;
      break;
 
 
    case OPT_Wnormalized_:
    case OPT_Wnormalized_:
      if (!value || (arg && strcasecmp (arg, "none") == 0))
      if (!value || (arg && strcasecmp (arg, "none") == 0))
        cpp_opts->warn_normalize = normalized_none;
        cpp_opts->warn_normalize = normalized_none;
      else if (!arg || strcasecmp (arg, "nfkc") == 0)
      else if (!arg || strcasecmp (arg, "nfkc") == 0)
        cpp_opts->warn_normalize = normalized_KC;
        cpp_opts->warn_normalize = normalized_KC;
      else if (strcasecmp (arg, "id") == 0)
      else if (strcasecmp (arg, "id") == 0)
        cpp_opts->warn_normalize = normalized_identifier_C;
        cpp_opts->warn_normalize = normalized_identifier_C;
      else if (strcasecmp (arg, "nfc") == 0)
      else if (strcasecmp (arg, "nfc") == 0)
        cpp_opts->warn_normalize = normalized_C;
        cpp_opts->warn_normalize = normalized_C;
      else
      else
        error ("argument %qs to %<-Wnormalized%> not recognized", arg);
        error ("argument %qs to %<-Wnormalized%> not recognized", arg);
      break;
      break;
 
 
    case OPT_Wreturn_type:
    case OPT_Wreturn_type:
      warn_return_type = value;
      warn_return_type = value;
      break;
      break;
 
 
    case OPT_Wstrict_null_sentinel:
    case OPT_Wstrict_null_sentinel:
      warn_strict_null_sentinel = value;
      warn_strict_null_sentinel = value;
      break;
      break;
 
 
    case OPT_Wsystem_headers:
    case OPT_Wsystem_headers:
      cpp_opts->warn_system_headers = value;
      cpp_opts->warn_system_headers = value;
      break;
      break;
 
 
    case OPT_Wtraditional:
    case OPT_Wtraditional:
      cpp_opts->warn_traditional = value;
      cpp_opts->warn_traditional = value;
      break;
      break;
 
 
    case OPT_Wtrigraphs:
    case OPT_Wtrigraphs:
      cpp_opts->warn_trigraphs = value;
      cpp_opts->warn_trigraphs = value;
      break;
      break;
 
 
    case OPT_Wundef:
    case OPT_Wundef:
      cpp_opts->warn_undef = value;
      cpp_opts->warn_undef = value;
      break;
      break;
 
 
    case OPT_Wunknown_pragmas:
    case OPT_Wunknown_pragmas:
      /* Set to greater than 1, so that even unknown pragmas in
      /* Set to greater than 1, so that even unknown pragmas in
         system headers will be warned about.  */
         system headers will be warned about.  */
      warn_unknown_pragmas = value * 2;
      warn_unknown_pragmas = value * 2;
      break;
      break;
 
 
    case OPT_Wunused_macros:
    case OPT_Wunused_macros:
      warn_unused_macros = value;
      warn_unused_macros = value;
      break;
      break;
 
 
    case OPT_Wvariadic_macros:
    case OPT_Wvariadic_macros:
      warn_variadic_macros = value;
      warn_variadic_macros = value;
      break;
      break;
 
 
    case OPT_Wwrite_strings:
    case OPT_Wwrite_strings:
      warn_write_strings = value;
      warn_write_strings = value;
      break;
      break;
 
 
    case OPT_Weffc__:
    case OPT_Weffc__:
      warn_ecpp = value;
      warn_ecpp = value;
      if (value)
      if (value)
        warn_nonvdtor = true;
        warn_nonvdtor = true;
      break;
      break;
 
 
    case OPT_ansi:
    case OPT_ansi:
      if (!c_dialect_cxx ())
      if (!c_dialect_cxx ())
        set_std_c89 (false, true);
        set_std_c89 (false, true);
      else
      else
        set_std_cxx98 (true);
        set_std_cxx98 (true);
      break;
      break;
 
 
    case OPT_d:
    case OPT_d:
      handle_OPT_d (arg);
      handle_OPT_d (arg);
      break;
      break;
 
 
    case OPT_fcond_mismatch:
    case OPT_fcond_mismatch:
      if (!c_dialect_cxx ())
      if (!c_dialect_cxx ())
        {
        {
          flag_cond_mismatch = value;
          flag_cond_mismatch = value;
          break;
          break;
        }
        }
      /* Fall through.  */
      /* Fall through.  */
 
 
    case OPT_fall_virtual:
    case OPT_fall_virtual:
    case OPT_falt_external_templates:
    case OPT_falt_external_templates:
    case OPT_fenum_int_equiv:
    case OPT_fenum_int_equiv:
    case OPT_fexternal_templates:
    case OPT_fexternal_templates:
    case OPT_fguiding_decls:
    case OPT_fguiding_decls:
    case OPT_fhonor_std:
    case OPT_fhonor_std:
    case OPT_fhuge_objects:
    case OPT_fhuge_objects:
    case OPT_flabels_ok:
    case OPT_flabels_ok:
    case OPT_fname_mangling_version_:
    case OPT_fname_mangling_version_:
    case OPT_fnew_abi:
    case OPT_fnew_abi:
    case OPT_fnonnull_objects:
    case OPT_fnonnull_objects:
    case OPT_fsquangle:
    case OPT_fsquangle:
    case OPT_fstrict_prototype:
    case OPT_fstrict_prototype:
    case OPT_fthis_is_variable:
    case OPT_fthis_is_variable:
    case OPT_fvtable_thunks:
    case OPT_fvtable_thunks:
    case OPT_fxref:
    case OPT_fxref:
    case OPT_fvtable_gc:
    case OPT_fvtable_gc:
      warning (0, "switch %qs is no longer supported", option->opt_text);
      warning (0, "switch %qs is no longer supported", option->opt_text);
      break;
      break;
 
 
    case OPT_faccess_control:
    case OPT_faccess_control:
      flag_access_control = value;
      flag_access_control = value;
      break;
      break;
 
 
    case OPT_fasm:
    case OPT_fasm:
      flag_no_asm = !value;
      flag_no_asm = !value;
      break;
      break;
 
 
    case OPT_fbuiltin:
    case OPT_fbuiltin:
      flag_no_builtin = !value;
      flag_no_builtin = !value;
      break;
      break;
 
 
    case OPT_fbuiltin_:
    case OPT_fbuiltin_:
      if (value)
      if (value)
        result = 0;
        result = 0;
      else
      else
        disable_builtin_function (arg);
        disable_builtin_function (arg);
      break;
      break;
 
 
    case OPT_fdollars_in_identifiers:
    case OPT_fdollars_in_identifiers:
      cpp_opts->dollars_in_ident = value;
      cpp_opts->dollars_in_ident = value;
      break;
      break;
 
 
    case OPT_ffreestanding:
    case OPT_ffreestanding:
      value = !value;
      value = !value;
      /* Fall through....  */
      /* Fall through....  */
    case OPT_fhosted:
    case OPT_fhosted:
      flag_hosted = value;
      flag_hosted = value;
      flag_no_builtin = !value;
      flag_no_builtin = !value;
      /* warn_main will be 2 if set by -Wall, 1 if set by -Wmain */
      /* warn_main will be 2 if set by -Wall, 1 if set by -Wmain */
      if (!value && warn_main == 2)
      if (!value && warn_main == 2)
        warn_main = 0;
        warn_main = 0;
      break;
      break;
 
 
    case OPT_fshort_double:
    case OPT_fshort_double:
      flag_short_double = value;
      flag_short_double = value;
      break;
      break;
 
 
    case OPT_fshort_enums:
    case OPT_fshort_enums:
      flag_short_enums = value;
      flag_short_enums = value;
      break;
      break;
 
 
    case OPT_fshort_wchar:
    case OPT_fshort_wchar:
      flag_short_wchar = value;
      flag_short_wchar = value;
      break;
      break;
 
 
    case OPT_fsigned_bitfields:
    case OPT_fsigned_bitfields:
      flag_signed_bitfields = value;
      flag_signed_bitfields = value;
      break;
      break;
 
 
    case OPT_fsigned_char:
    case OPT_fsigned_char:
      flag_signed_char = value;
      flag_signed_char = value;
      break;
      break;
 
 
    case OPT_funsigned_bitfields:
    case OPT_funsigned_bitfields:
      flag_signed_bitfields = !value;
      flag_signed_bitfields = !value;
      break;
      break;
 
 
    case OPT_funsigned_char:
    case OPT_funsigned_char:
      flag_signed_char = !value;
      flag_signed_char = !value;
      break;
      break;
 
 
    case OPT_fcheck_new:
    case OPT_fcheck_new:
      flag_check_new = value;
      flag_check_new = value;
      break;
      break;
 
 
    case OPT_fconserve_space:
    case OPT_fconserve_space:
      flag_conserve_space = value;
      flag_conserve_space = value;
      break;
      break;
 
 
    case OPT_fconstant_string_class_:
    case OPT_fconstant_string_class_:
      constant_string_class_name = arg;
      constant_string_class_name = arg;
      break;
      break;
 
 
    case OPT_fdefault_inline:
    case OPT_fdefault_inline:
      flag_default_inline = value;
      flag_default_inline = value;
      break;
      break;
 
 
    case OPT_felide_constructors:
    case OPT_felide_constructors:
      flag_elide_constructors = value;
      flag_elide_constructors = value;
      break;
      break;
 
 
    case OPT_fenforce_eh_specs:
    case OPT_fenforce_eh_specs:
      flag_enforce_eh_specs = value;
      flag_enforce_eh_specs = value;
      break;
      break;
 
 
    case OPT_fextended_identifiers:
    case OPT_fextended_identifiers:
      cpp_opts->extended_identifiers = value;
      cpp_opts->extended_identifiers = value;
      break;
      break;
 
 
    case OPT_ffor_scope:
    case OPT_ffor_scope:
      flag_new_for_scope = value;
      flag_new_for_scope = value;
      break;
      break;
 
 
    case OPT_fgnu_keywords:
    case OPT_fgnu_keywords:
      flag_no_gnu_keywords = !value;
      flag_no_gnu_keywords = !value;
      break;
      break;
 
 
    case OPT_fgnu_runtime:
    case OPT_fgnu_runtime:
      flag_next_runtime = !value;
      flag_next_runtime = !value;
      break;
      break;
 
 
    case OPT_fhandle_exceptions:
    case OPT_fhandle_exceptions:
      warning (0, "-fhandle-exceptions has been renamed -fexceptions (and is now on by default)");
      warning (0, "-fhandle-exceptions has been renamed -fexceptions (and is now on by default)");
      flag_exceptions = value;
      flag_exceptions = value;
      break;
      break;
 
 
    case OPT_fimplement_inlines:
    case OPT_fimplement_inlines:
      flag_implement_inlines = value;
      flag_implement_inlines = value;
      break;
      break;
 
 
    case OPT_fimplicit_inline_templates:
    case OPT_fimplicit_inline_templates:
      flag_implicit_inline_templates = value;
      flag_implicit_inline_templates = value;
      break;
      break;
 
 
    case OPT_fimplicit_templates:
    case OPT_fimplicit_templates:
      flag_implicit_templates = value;
      flag_implicit_templates = value;
      break;
      break;
 
 
    case OPT_fms_extensions:
    case OPT_fms_extensions:
      flag_ms_extensions = value;
      flag_ms_extensions = value;
      break;
      break;
 
 
    case OPT_fnext_runtime:
    case OPT_fnext_runtime:
      flag_next_runtime = value;
      flag_next_runtime = value;
      break;
      break;
 
 
    case OPT_fnil_receivers:
    case OPT_fnil_receivers:
      flag_nil_receivers = value;
      flag_nil_receivers = value;
      break;
      break;
 
 
    case OPT_fnonansi_builtins:
    case OPT_fnonansi_builtins:
      flag_no_nonansi_builtin = !value;
      flag_no_nonansi_builtin = !value;
      break;
      break;
 
 
    case OPT_foperator_names:
    case OPT_foperator_names:
      cpp_opts->operator_names = value;
      cpp_opts->operator_names = value;
      break;
      break;
 
 
    case OPT_foptional_diags:
    case OPT_foptional_diags:
      flag_optional_diags = value;
      flag_optional_diags = value;
      break;
      break;
 
 
    case OPT_fpch_deps:
    case OPT_fpch_deps:
      cpp_opts->restore_pch_deps = value;
      cpp_opts->restore_pch_deps = value;
      break;
      break;
 
 
    case OPT_fpch_preprocess:
    case OPT_fpch_preprocess:
      flag_pch_preprocess = value;
      flag_pch_preprocess = value;
      break;
      break;
 
 
    case OPT_fpermissive:
    case OPT_fpermissive:
      flag_permissive = value;
      flag_permissive = value;
      break;
      break;
 
 
    case OPT_fpreprocessed:
    case OPT_fpreprocessed:
      cpp_opts->preprocessed = value;
      cpp_opts->preprocessed = value;
      break;
      break;
 
 
    case OPT_freplace_objc_classes:
    case OPT_freplace_objc_classes:
      flag_replace_objc_classes = value;
      flag_replace_objc_classes = value;
      break;
      break;
 
 
    case OPT_frepo:
    case OPT_frepo:
      flag_use_repository = value;
      flag_use_repository = value;
      if (value)
      if (value)
        flag_implicit_templates = 0;
        flag_implicit_templates = 0;
      break;
      break;
 
 
    case OPT_frtti:
    case OPT_frtti:
      flag_rtti = value;
      flag_rtti = value;
      break;
      break;
 
 
    case OPT_fshow_column:
    case OPT_fshow_column:
      cpp_opts->show_column = value;
      cpp_opts->show_column = value;
      break;
      break;
 
 
    case OPT_fstats:
    case OPT_fstats:
      flag_detailed_statistics = value;
      flag_detailed_statistics = value;
      break;
      break;
 
 
    case OPT_ftabstop_:
    case OPT_ftabstop_:
      /* It is documented that we silently ignore silly values.  */
      /* It is documented that we silently ignore silly values.  */
      if (value >= 1 && value <= 100)
      if (value >= 1 && value <= 100)
        cpp_opts->tabstop = value;
        cpp_opts->tabstop = value;
      break;
      break;
 
 
    case OPT_fexec_charset_:
    case OPT_fexec_charset_:
      cpp_opts->narrow_charset = arg;
      cpp_opts->narrow_charset = arg;
      break;
      break;
 
 
    case OPT_fwide_exec_charset_:
    case OPT_fwide_exec_charset_:
      cpp_opts->wide_charset = arg;
      cpp_opts->wide_charset = arg;
      break;
      break;
 
 
    case OPT_finput_charset_:
    case OPT_finput_charset_:
      cpp_opts->input_charset = arg;
      cpp_opts->input_charset = arg;
      break;
      break;
 
 
    case OPT_ftemplate_depth_:
    case OPT_ftemplate_depth_:
      max_tinst_depth = value;
      max_tinst_depth = value;
      break;
      break;
 
 
    case OPT_fuse_cxa_atexit:
    case OPT_fuse_cxa_atexit:
      flag_use_cxa_atexit = value;
      flag_use_cxa_atexit = value;
      break;
      break;
 
 
    case OPT_fuse_cxa_get_exception_ptr:
    case OPT_fuse_cxa_get_exception_ptr:
      flag_use_cxa_get_exception_ptr = value;
      flag_use_cxa_get_exception_ptr = value;
      break;
      break;
 
 
    case OPT_fvisibility_inlines_hidden:
    case OPT_fvisibility_inlines_hidden:
      visibility_options.inlines_hidden = value;
      visibility_options.inlines_hidden = value;
      break;
      break;
 
 
    case OPT_fweak:
    case OPT_fweak:
      flag_weak = value;
      flag_weak = value;
      break;
      break;
 
 
    case OPT_fthreadsafe_statics:
    case OPT_fthreadsafe_statics:
      flag_threadsafe_statics = value;
      flag_threadsafe_statics = value;
      break;
      break;
 
 
    case OPT_fzero_link:
    case OPT_fzero_link:
      flag_zero_link = value;
      flag_zero_link = value;
      break;
      break;
 
 
    case OPT_gen_decls:
    case OPT_gen_decls:
      flag_gen_declaration = 1;
      flag_gen_declaration = 1;
      break;
      break;
 
 
    case OPT_idirafter:
    case OPT_idirafter:
      add_path (xstrdup (arg), AFTER, 0, true);
      add_path (xstrdup (arg), AFTER, 0, true);
      break;
      break;
 
 
    case OPT_imacros:
    case OPT_imacros:
    case OPT_include:
    case OPT_include:
      defer_opt (code, arg);
      defer_opt (code, arg);
      break;
      break;
 
 
    case OPT_imultilib:
    case OPT_imultilib:
      imultilib = arg;
      imultilib = arg;
      break;
      break;
 
 
    case OPT_iprefix:
    case OPT_iprefix:
      iprefix = arg;
      iprefix = arg;
      break;
      break;
 
 
    case OPT_iquote:
    case OPT_iquote:
      add_path (xstrdup (arg), QUOTE, 0, true);
      add_path (xstrdup (arg), QUOTE, 0, true);
      break;
      break;
 
 
    case OPT_isysroot:
    case OPT_isysroot:
      sysroot = arg;
      sysroot = arg;
      break;
      break;
 
 
    case OPT_isystem:
    case OPT_isystem:
      add_path (xstrdup (arg), SYSTEM, 0, true);
      add_path (xstrdup (arg), SYSTEM, 0, true);
      break;
      break;
 
 
    case OPT_iwithprefix:
    case OPT_iwithprefix:
      add_prefixed_path (arg, SYSTEM);
      add_prefixed_path (arg, SYSTEM);
      break;
      break;
 
 
    case OPT_iwithprefixbefore:
    case OPT_iwithprefixbefore:
      add_prefixed_path (arg, BRACKET);
      add_prefixed_path (arg, BRACKET);
      break;
      break;
 
 
    case OPT_lang_asm:
    case OPT_lang_asm:
      cpp_set_lang (parse_in, CLK_ASM);
      cpp_set_lang (parse_in, CLK_ASM);
      cpp_opts->dollars_in_ident = false;
      cpp_opts->dollars_in_ident = false;
      break;
      break;
 
 
    case OPT_lang_fortran:
    case OPT_lang_fortran:
      lang_fortran = true;
      lang_fortran = true;
      break;
      break;
 
 
    case OPT_lang_objc:
    case OPT_lang_objc:
      cpp_opts->objc = 1;
      cpp_opts->objc = 1;
      break;
      break;
 
 
    case OPT_nostdinc:
    case OPT_nostdinc:
      std_inc = false;
      std_inc = false;
      break;
      break;
 
 
    case OPT_nostdinc__:
    case OPT_nostdinc__:
      std_cxx_inc = false;
      std_cxx_inc = false;
      break;
      break;
 
 
    case OPT_o:
    case OPT_o:
      if (!out_fname)
      if (!out_fname)
        out_fname = arg;
        out_fname = arg;
      else
      else
        error ("output filename specified twice");
        error ("output filename specified twice");
      break;
      break;
 
 
      /* We need to handle the -pedantic switches here, rather than in
      /* We need to handle the -pedantic switches here, rather than in
         c_common_post_options, so that a subsequent -Wno-endif-labels
         c_common_post_options, so that a subsequent -Wno-endif-labels
         is not overridden.  */
         is not overridden.  */
    case OPT_pedantic_errors:
    case OPT_pedantic_errors:
      cpp_opts->pedantic_errors = 1;
      cpp_opts->pedantic_errors = 1;
      /* Fall through.  */
      /* Fall through.  */
    case OPT_pedantic:
    case OPT_pedantic:
      cpp_opts->pedantic = 1;
      cpp_opts->pedantic = 1;
      cpp_opts->warn_endif_labels = 1;
      cpp_opts->warn_endif_labels = 1;
      if (warn_pointer_sign == -1)
      if (warn_pointer_sign == -1)
        warn_pointer_sign = 1;
        warn_pointer_sign = 1;
      if (warn_overlength_strings == -1)
      if (warn_overlength_strings == -1)
        warn_overlength_strings = 1;
        warn_overlength_strings = 1;
      break;
      break;
 
 
    case OPT_print_objc_runtime_info:
    case OPT_print_objc_runtime_info:
      print_struct_values = 1;
      print_struct_values = 1;
      break;
      break;
 
 
    case OPT_print_pch_checksum:
    case OPT_print_pch_checksum:
      c_common_print_pch_checksum (stdout);
      c_common_print_pch_checksum (stdout);
      exit_after_options = true;
      exit_after_options = true;
      break;
      break;
 
 
    case OPT_remap:
    case OPT_remap:
      cpp_opts->remap = 1;
      cpp_opts->remap = 1;
      break;
      break;
 
 
    case OPT_std_c__98:
    case OPT_std_c__98:
    case OPT_std_gnu__98:
    case OPT_std_gnu__98:
      if (!preprocessing_asm_p)
      if (!preprocessing_asm_p)
        set_std_cxx98 (code == OPT_std_c__98 /* ISO */);
        set_std_cxx98 (code == OPT_std_c__98 /* ISO */);
      break;
      break;
 
 
    case OPT_std_c89:
    case OPT_std_c89:
    case OPT_std_iso9899_1990:
    case OPT_std_iso9899_1990:
    case OPT_std_iso9899_199409:
    case OPT_std_iso9899_199409:
      if (!preprocessing_asm_p)
      if (!preprocessing_asm_p)
        set_std_c89 (code == OPT_std_iso9899_199409 /* c94 */, true /* ISO */);
        set_std_c89 (code == OPT_std_iso9899_199409 /* c94 */, true /* ISO */);
      break;
      break;
 
 
    case OPT_std_gnu89:
    case OPT_std_gnu89:
      if (!preprocessing_asm_p)
      if (!preprocessing_asm_p)
        set_std_c89 (false /* c94 */, false /* ISO */);
        set_std_c89 (false /* c94 */, false /* ISO */);
      break;
      break;
 
 
    case OPT_std_c99:
    case OPT_std_c99:
    case OPT_std_c9x:
    case OPT_std_c9x:
    case OPT_std_iso9899_1999:
    case OPT_std_iso9899_1999:
    case OPT_std_iso9899_199x:
    case OPT_std_iso9899_199x:
      if (!preprocessing_asm_p)
      if (!preprocessing_asm_p)
        set_std_c99 (true /* ISO */);
        set_std_c99 (true /* ISO */);
      break;
      break;
 
 
    case OPT_std_gnu99:
    case OPT_std_gnu99:
    case OPT_std_gnu9x:
    case OPT_std_gnu9x:
      if (!preprocessing_asm_p)
      if (!preprocessing_asm_p)
        set_std_c99 (false /* ISO */);
        set_std_c99 (false /* ISO */);
      break;
      break;
 
 
    case OPT_trigraphs:
    case OPT_trigraphs:
      cpp_opts->trigraphs = 1;
      cpp_opts->trigraphs = 1;
      break;
      break;
 
 
    case OPT_traditional_cpp:
    case OPT_traditional_cpp:
      cpp_opts->traditional = 1;
      cpp_opts->traditional = 1;
      break;
      break;
 
 
    case OPT_undef:
    case OPT_undef:
      flag_undef = 1;
      flag_undef = 1;
      break;
      break;
 
 
    case OPT_w:
    case OPT_w:
      cpp_opts->inhibit_warnings = 1;
      cpp_opts->inhibit_warnings = 1;
      break;
      break;
 
 
    case OPT_v:
    case OPT_v:
      verbose = true;
      verbose = true;
      break;
      break;
    }
    }
 
 
  return result;
  return result;
}
}
 
 
/* Post-switch processing.  */
/* Post-switch processing.  */
bool
bool
c_common_post_options (const char **pfilename)
c_common_post_options (const char **pfilename)
{
{
  struct cpp_callbacks *cb;
  struct cpp_callbacks *cb;
 
 
  /* Canonicalize the input and output filenames.  */
  /* Canonicalize the input and output filenames.  */
  if (in_fnames == NULL)
  if (in_fnames == NULL)
    {
    {
      in_fnames = XNEWVEC (const char *, 1);
      in_fnames = XNEWVEC (const char *, 1);
      in_fnames[0] = "";
      in_fnames[0] = "";
    }
    }
  else if (strcmp (in_fnames[0], "-") == 0)
  else if (strcmp (in_fnames[0], "-") == 0)
    in_fnames[0] = "";
    in_fnames[0] = "";
 
 
  if (out_fname == NULL || !strcmp (out_fname, "-"))
  if (out_fname == NULL || !strcmp (out_fname, "-"))
    out_fname = "";
    out_fname = "";
 
 
  if (cpp_opts->deps.style == DEPS_NONE)
  if (cpp_opts->deps.style == DEPS_NONE)
    check_deps_environment_vars ();
    check_deps_environment_vars ();
 
 
  handle_deferred_opts ();
  handle_deferred_opts ();
 
 
  sanitize_cpp_opts ();
  sanitize_cpp_opts ();
 
 
  register_include_chains (parse_in, sysroot, iprefix, imultilib,
  register_include_chains (parse_in, sysroot, iprefix, imultilib,
                           std_inc, std_cxx_inc && c_dialect_cxx (), verbose);
                           std_inc, std_cxx_inc && c_dialect_cxx (), verbose);
 
 
#ifdef C_COMMON_OVERRIDE_OPTIONS
#ifdef C_COMMON_OVERRIDE_OPTIONS
  /* Some machines may reject certain combinations of C
  /* Some machines may reject certain combinations of C
     language-specific options.  */
     language-specific options.  */
  C_COMMON_OVERRIDE_OPTIONS;
  C_COMMON_OVERRIDE_OPTIONS;
#endif
#endif
 
 
  flag_inline_trees = 1;
  flag_inline_trees = 1;
 
 
  /* Use tree inlining.  */
  /* Use tree inlining.  */
  if (!flag_no_inline)
  if (!flag_no_inline)
    flag_no_inline = 1;
    flag_no_inline = 1;
  if (flag_inline_functions)
  if (flag_inline_functions)
    flag_inline_trees = 2;
    flag_inline_trees = 2;
 
 
  /* We recognize -fgnu89-inline in preparation for 4.3 where the
  /* We recognize -fgnu89-inline in preparation for 4.3 where the
     option will be meaningful.  Here we just reject
     option will be meaningful.  Here we just reject
     -fno-gnu89-inline, since we don't support it.  */
     -fno-gnu89-inline, since we don't support it.  */
  if (!flag_gnu89_inline)
  if (!flag_gnu89_inline)
    error ("-fno-gnu89-inline is not supported");
    error ("-fno-gnu89-inline is not supported");
 
 
  /* If we are given more than one input file, we must use
  /* If we are given more than one input file, we must use
     unit-at-a-time mode.  */
     unit-at-a-time mode.  */
  if (num_in_fnames > 1)
  if (num_in_fnames > 1)
    flag_unit_at_a_time = 1;
    flag_unit_at_a_time = 1;
 
 
  /* Default to ObjC sjlj exception handling if NeXT runtime.  */
  /* Default to ObjC sjlj exception handling if NeXT runtime.  */
  if (flag_objc_sjlj_exceptions < 0)
  if (flag_objc_sjlj_exceptions < 0)
    flag_objc_sjlj_exceptions = flag_next_runtime;
    flag_objc_sjlj_exceptions = flag_next_runtime;
  if (flag_objc_exceptions && !flag_objc_sjlj_exceptions)
  if (flag_objc_exceptions && !flag_objc_sjlj_exceptions)
    flag_exceptions = 1;
    flag_exceptions = 1;
 
 
  /* -Wextra implies -Wsign-compare, -Wmissing-field-initializers and
  /* -Wextra implies -Wsign-compare, -Wmissing-field-initializers and
     -Woverride-init, but not if explicitly overridden.  */
     -Woverride-init, but not if explicitly overridden.  */
  if (warn_sign_compare == -1)
  if (warn_sign_compare == -1)
    warn_sign_compare = extra_warnings;
    warn_sign_compare = extra_warnings;
  if (warn_missing_field_initializers == -1)
  if (warn_missing_field_initializers == -1)
    warn_missing_field_initializers = extra_warnings;
    warn_missing_field_initializers = extra_warnings;
  if (warn_override_init == -1)
  if (warn_override_init == -1)
    warn_override_init = extra_warnings;
    warn_override_init = extra_warnings;
 
 
  /* -Wpointer_sign is disabled by default, but it is enabled if any
  /* -Wpointer_sign is disabled by default, but it is enabled if any
     of -Wall or -pedantic are given.  */
     of -Wall or -pedantic are given.  */
  if (warn_pointer_sign == -1)
  if (warn_pointer_sign == -1)
    warn_pointer_sign = 0;
    warn_pointer_sign = 0;
 
 
  /* -Woverlength-strings is off by default, but is enabled by -pedantic.
  /* -Woverlength-strings is off by default, but is enabled by -pedantic.
     It is never enabled in C++, as the minimum limit is not normative
     It is never enabled in C++, as the minimum limit is not normative
     in that standard.  */
     in that standard.  */
  if (warn_overlength_strings == -1 || c_dialect_cxx ())
  if (warn_overlength_strings == -1 || c_dialect_cxx ())
    warn_overlength_strings = 0;
    warn_overlength_strings = 0;
 
 
  /* Special format checking options don't work without -Wformat; warn if
  /* Special format checking options don't work without -Wformat; warn if
     they are used.  */
     they are used.  */
  if (!warn_format)
  if (!warn_format)
    {
    {
      warning (OPT_Wformat_y2k,
      warning (OPT_Wformat_y2k,
               "-Wformat-y2k ignored without -Wformat");
               "-Wformat-y2k ignored without -Wformat");
      warning (OPT_Wformat_extra_args,
      warning (OPT_Wformat_extra_args,
               "-Wformat-extra-args ignored without -Wformat");
               "-Wformat-extra-args ignored without -Wformat");
      warning (OPT_Wformat_zero_length,
      warning (OPT_Wformat_zero_length,
               "-Wformat-zero-length ignored without -Wformat");
               "-Wformat-zero-length ignored without -Wformat");
      warning (OPT_Wformat_nonliteral,
      warning (OPT_Wformat_nonliteral,
               "-Wformat-nonliteral ignored without -Wformat");
               "-Wformat-nonliteral ignored without -Wformat");
      warning (OPT_Wformat_security,
      warning (OPT_Wformat_security,
               "-Wformat-security ignored without -Wformat");
               "-Wformat-security ignored without -Wformat");
    }
    }
 
 
  /* C99 requires special handling of complex multiplication and division;
  /* C99 requires special handling of complex multiplication and division;
     -ffast-math and -fcx-limited-range are handled in process_options.  */
     -ffast-math and -fcx-limited-range are handled in process_options.  */
  if (flag_isoc99)
  if (flag_isoc99)
    flag_complex_method = 2;
    flag_complex_method = 2;
 
 
  if (flag_preprocess_only)
  if (flag_preprocess_only)
    {
    {
      /* Open the output now.  We must do so even if flag_no_output is
      /* Open the output now.  We must do so even if flag_no_output is
         on, because there may be other output than from the actual
         on, because there may be other output than from the actual
         preprocessing (e.g. from -dM).  */
         preprocessing (e.g. from -dM).  */
      if (out_fname[0] == '\0')
      if (out_fname[0] == '\0')
        out_stream = stdout;
        out_stream = stdout;
      else
      else
        out_stream = fopen (out_fname, "w");
        out_stream = fopen (out_fname, "w");
 
 
      if (out_stream == NULL)
      if (out_stream == NULL)
        {
        {
          fatal_error ("opening output file %s: %m", out_fname);
          fatal_error ("opening output file %s: %m", out_fname);
          return false;
          return false;
        }
        }
 
 
      if (num_in_fnames > 1)
      if (num_in_fnames > 1)
        error ("too many filenames given.  Type %s --help for usage",
        error ("too many filenames given.  Type %s --help for usage",
               progname);
               progname);
 
 
      init_pp_output (out_stream);
      init_pp_output (out_stream);
    }
    }
  else
  else
    {
    {
      init_c_lex ();
      init_c_lex ();
 
 
      /* Yuk.  WTF is this?  I do know ObjC relies on it somewhere.  */
      /* Yuk.  WTF is this?  I do know ObjC relies on it somewhere.  */
      input_location = UNKNOWN_LOCATION;
      input_location = UNKNOWN_LOCATION;
    }
    }
 
 
  cb = cpp_get_callbacks (parse_in);
  cb = cpp_get_callbacks (parse_in);
  cb->file_change = cb_file_change;
  cb->file_change = cb_file_change;
  cb->dir_change = cb_dir_change;
  cb->dir_change = cb_dir_change;
  cpp_post_options (parse_in);
  cpp_post_options (parse_in);
 
 
  input_location = UNKNOWN_LOCATION;
  input_location = UNKNOWN_LOCATION;
 
 
  /* If an error has occurred in cpplib, note it so we fail
  /* If an error has occurred in cpplib, note it so we fail
     immediately.  */
     immediately.  */
  errorcount += cpp_errors (parse_in);
  errorcount += cpp_errors (parse_in);
 
 
  *pfilename = this_input_filename
  *pfilename = this_input_filename
    = cpp_read_main_file (parse_in, in_fnames[0]);
    = cpp_read_main_file (parse_in, in_fnames[0]);
  /* Don't do any compilation or preprocessing if there is no input file.  */
  /* Don't do any compilation or preprocessing if there is no input file.  */
  if (this_input_filename == NULL)
  if (this_input_filename == NULL)
    {
    {
      errorcount++;
      errorcount++;
      return false;
      return false;
    }
    }
 
 
  if (flag_working_directory
  if (flag_working_directory
      && flag_preprocess_only && !flag_no_line_commands)
      && flag_preprocess_only && !flag_no_line_commands)
    pp_dir_change (parse_in, get_src_pwd ());
    pp_dir_change (parse_in, get_src_pwd ());
 
 
  return flag_preprocess_only;
  return flag_preprocess_only;
}
}
 
 
/* Front end initialization common to C, ObjC and C++.  */
/* Front end initialization common to C, ObjC and C++.  */
bool
bool
c_common_init (void)
c_common_init (void)
{
{
  /* Set up preprocessor arithmetic.  Must be done after call to
  /* Set up preprocessor arithmetic.  Must be done after call to
     c_common_nodes_and_builtins for type nodes to be good.  */
     c_common_nodes_and_builtins for type nodes to be good.  */
  cpp_opts->precision = TYPE_PRECISION (intmax_type_node);
  cpp_opts->precision = TYPE_PRECISION (intmax_type_node);
  cpp_opts->char_precision = TYPE_PRECISION (char_type_node);
  cpp_opts->char_precision = TYPE_PRECISION (char_type_node);
  cpp_opts->int_precision = TYPE_PRECISION (integer_type_node);
  cpp_opts->int_precision = TYPE_PRECISION (integer_type_node);
  cpp_opts->wchar_precision = TYPE_PRECISION (wchar_type_node);
  cpp_opts->wchar_precision = TYPE_PRECISION (wchar_type_node);
  cpp_opts->unsigned_wchar = TYPE_UNSIGNED (wchar_type_node);
  cpp_opts->unsigned_wchar = TYPE_UNSIGNED (wchar_type_node);
  cpp_opts->bytes_big_endian = BYTES_BIG_ENDIAN;
  cpp_opts->bytes_big_endian = BYTES_BIG_ENDIAN;
 
 
  /* This can't happen until after wchar_precision and bytes_big_endian
  /* This can't happen until after wchar_precision and bytes_big_endian
     are known.  */
     are known.  */
  cpp_init_iconv (parse_in);
  cpp_init_iconv (parse_in);
 
 
  if (version_flag)
  if (version_flag)
    c_common_print_pch_checksum (stderr);
    c_common_print_pch_checksum (stderr);
 
 
  if (flag_preprocess_only)
  if (flag_preprocess_only)
    {
    {
      finish_options ();
      finish_options ();
      preprocess_file (parse_in);
      preprocess_file (parse_in);
      return false;
      return false;
    }
    }
 
 
  /* Has to wait until now so that cpplib has its hash table.  */
  /* Has to wait until now so that cpplib has its hash table.  */
  init_pragma ();
  init_pragma ();
 
 
  return true;
  return true;
}
}
 
 
/* Initialize the integrated preprocessor after debug output has been
/* Initialize the integrated preprocessor after debug output has been
   initialized; loop over each input file.  */
   initialized; loop over each input file.  */
void
void
c_common_parse_file (int set_yydebug)
c_common_parse_file (int set_yydebug)
{
{
  unsigned int i;
  unsigned int i;
 
 
  /* Enable parser debugging, if requested and we can.  If requested
  /* Enable parser debugging, if requested and we can.  If requested
     and we can't, notify the user.  */
     and we can't, notify the user.  */
#if YYDEBUG != 0
#if YYDEBUG != 0
  yydebug = set_yydebug;
  yydebug = set_yydebug;
#else
#else
  if (set_yydebug)
  if (set_yydebug)
    warning (0, "YYDEBUG was not defined at build time, -dy ignored");
    warning (0, "YYDEBUG was not defined at build time, -dy ignored");
#endif
#endif
 
 
  i = 0;
  i = 0;
  for (;;)
  for (;;)
    {
    {
      /* Start the main input file, if the debug writer wants it. */
      /* Start the main input file, if the debug writer wants it. */
      if (debug_hooks->start_end_main_source_file)
      if (debug_hooks->start_end_main_source_file)
        (*debug_hooks->start_source_file) (0, this_input_filename);
        (*debug_hooks->start_source_file) (0, this_input_filename);
      finish_options ();
      finish_options ();
      pch_init ();
      pch_init ();
      push_file_scope ();
      push_file_scope ();
      c_parse_file ();
      c_parse_file ();
      finish_file ();
      finish_file ();
      pop_file_scope ();
      pop_file_scope ();
      /* And end the main input file, if the debug writer wants it  */
      /* And end the main input file, if the debug writer wants it  */
      if (debug_hooks->start_end_main_source_file)
      if (debug_hooks->start_end_main_source_file)
        (*debug_hooks->end_source_file) (0);
        (*debug_hooks->end_source_file) (0);
      if (++i >= num_in_fnames)
      if (++i >= num_in_fnames)
        break;
        break;
      cpp_undef_all (parse_in);
      cpp_undef_all (parse_in);
      this_input_filename
      this_input_filename
        = cpp_read_main_file (parse_in, in_fnames[i]);
        = cpp_read_main_file (parse_in, in_fnames[i]);
      /* If an input file is missing, abandon further compilation.
      /* If an input file is missing, abandon further compilation.
         cpplib has issued a diagnostic.  */
         cpplib has issued a diagnostic.  */
      if (!this_input_filename)
      if (!this_input_filename)
        break;
        break;
    }
    }
}
}
 
 
/* Common finish hook for the C, ObjC and C++ front ends.  */
/* Common finish hook for the C, ObjC and C++ front ends.  */
void
void
c_common_finish (void)
c_common_finish (void)
{
{
  FILE *deps_stream = NULL;
  FILE *deps_stream = NULL;
 
 
  if (cpp_opts->deps.style != DEPS_NONE)
  if (cpp_opts->deps.style != DEPS_NONE)
    {
    {
      /* If -M or -MM was seen without -MF, default output to the
      /* If -M or -MM was seen without -MF, default output to the
         output stream.  */
         output stream.  */
      if (!deps_file)
      if (!deps_file)
        deps_stream = out_stream;
        deps_stream = out_stream;
      else
      else
        {
        {
          deps_stream = fopen (deps_file, deps_append ? "a": "w");
          deps_stream = fopen (deps_file, deps_append ? "a": "w");
          if (!deps_stream)
          if (!deps_stream)
            fatal_error ("opening dependency file %s: %m", deps_file);
            fatal_error ("opening dependency file %s: %m", deps_file);
        }
        }
    }
    }
 
 
  /* For performance, avoid tearing down cpplib's internal structures
  /* For performance, avoid tearing down cpplib's internal structures
     with cpp_destroy ().  */
     with cpp_destroy ().  */
  errorcount += cpp_finish (parse_in, deps_stream);
  errorcount += cpp_finish (parse_in, deps_stream);
 
 
  if (deps_stream && deps_stream != out_stream
  if (deps_stream && deps_stream != out_stream
      && (ferror (deps_stream) || fclose (deps_stream)))
      && (ferror (deps_stream) || fclose (deps_stream)))
    fatal_error ("closing dependency file %s: %m", deps_file);
    fatal_error ("closing dependency file %s: %m", deps_file);
 
 
  if (out_stream && (ferror (out_stream) || fclose (out_stream)))
  if (out_stream && (ferror (out_stream) || fclose (out_stream)))
    fatal_error ("when writing output to %s: %m", out_fname);
    fatal_error ("when writing output to %s: %m", out_fname);
}
}
 
 
/* Either of two environment variables can specify output of
/* Either of two environment variables can specify output of
   dependencies.  Their value is either "OUTPUT_FILE" or "OUTPUT_FILE
   dependencies.  Their value is either "OUTPUT_FILE" or "OUTPUT_FILE
   DEPS_TARGET", where OUTPUT_FILE is the file to write deps info to
   DEPS_TARGET", where OUTPUT_FILE is the file to write deps info to
   and DEPS_TARGET is the target to mention in the deps.  They also
   and DEPS_TARGET is the target to mention in the deps.  They also
   result in dependency information being appended to the output file
   result in dependency information being appended to the output file
   rather than overwriting it, and like Sun's compiler
   rather than overwriting it, and like Sun's compiler
   SUNPRO_DEPENDENCIES suppresses the dependency on the main file.  */
   SUNPRO_DEPENDENCIES suppresses the dependency on the main file.  */
static void
static void
check_deps_environment_vars (void)
check_deps_environment_vars (void)
{
{
  char *spec;
  char *spec;
 
 
  GET_ENVIRONMENT (spec, "DEPENDENCIES_OUTPUT");
  GET_ENVIRONMENT (spec, "DEPENDENCIES_OUTPUT");
  if (spec)
  if (spec)
    cpp_opts->deps.style = DEPS_USER;
    cpp_opts->deps.style = DEPS_USER;
  else
  else
    {
    {
      GET_ENVIRONMENT (spec, "SUNPRO_DEPENDENCIES");
      GET_ENVIRONMENT (spec, "SUNPRO_DEPENDENCIES");
      if (spec)
      if (spec)
        {
        {
          cpp_opts->deps.style = DEPS_SYSTEM;
          cpp_opts->deps.style = DEPS_SYSTEM;
          cpp_opts->deps.ignore_main_file = true;
          cpp_opts->deps.ignore_main_file = true;
        }
        }
    }
    }
 
 
  if (spec)
  if (spec)
    {
    {
      /* Find the space before the DEPS_TARGET, if there is one.  */
      /* Find the space before the DEPS_TARGET, if there is one.  */
      char *s = strchr (spec, ' ');
      char *s = strchr (spec, ' ');
      if (s)
      if (s)
        {
        {
          /* Let the caller perform MAKE quoting.  */
          /* Let the caller perform MAKE quoting.  */
          defer_opt (OPT_MT, s + 1);
          defer_opt (OPT_MT, s + 1);
          *s = '\0';
          *s = '\0';
        }
        }
 
 
      /* Command line -MF overrides environment variables and default.  */
      /* Command line -MF overrides environment variables and default.  */
      if (!deps_file)
      if (!deps_file)
        deps_file = spec;
        deps_file = spec;
 
 
      deps_append = 1;
      deps_append = 1;
      deps_seen = true;
      deps_seen = true;
    }
    }
}
}
 
 
/* Handle deferred command line switches.  */
/* Handle deferred command line switches.  */
static void
static void
handle_deferred_opts (void)
handle_deferred_opts (void)
{
{
  size_t i;
  size_t i;
  struct deps *deps;
  struct deps *deps;
 
 
  /* Avoid allocating the deps buffer if we don't need it.
  /* Avoid allocating the deps buffer if we don't need it.
     (This flag may be true without there having been -MT or -MQ
     (This flag may be true without there having been -MT or -MQ
     options, but we'll still need the deps buffer.)  */
     options, but we'll still need the deps buffer.)  */
  if (!deps_seen)
  if (!deps_seen)
    return;
    return;
 
 
  deps = cpp_get_deps (parse_in);
  deps = cpp_get_deps (parse_in);
 
 
  for (i = 0; i < deferred_count; i++)
  for (i = 0; i < deferred_count; i++)
    {
    {
      struct deferred_opt *opt = &deferred_opts[i];
      struct deferred_opt *opt = &deferred_opts[i];
 
 
      if (opt->code == OPT_MT || opt->code == OPT_MQ)
      if (opt->code == OPT_MT || opt->code == OPT_MQ)
        deps_add_target (deps, opt->arg, opt->code == OPT_MQ);
        deps_add_target (deps, opt->arg, opt->code == OPT_MQ);
    }
    }
}
}
 
 
/* These settings are appropriate for GCC, but not necessarily so for
/* These settings are appropriate for GCC, but not necessarily so for
   cpplib as a library.  */
   cpplib as a library.  */
static void
static void
sanitize_cpp_opts (void)
sanitize_cpp_opts (void)
{
{
  /* If we don't know what style of dependencies to output, complain
  /* If we don't know what style of dependencies to output, complain
     if any other dependency switches have been given.  */
     if any other dependency switches have been given.  */
  if (deps_seen && cpp_opts->deps.style == DEPS_NONE)
  if (deps_seen && cpp_opts->deps.style == DEPS_NONE)
    error ("to generate dependencies you must specify either -M or -MM");
    error ("to generate dependencies you must specify either -M or -MM");
 
 
  /* -dM and dependencies suppress normal output; do it here so that
  /* -dM and dependencies suppress normal output; do it here so that
     the last -d[MDN] switch overrides earlier ones.  */
     the last -d[MDN] switch overrides earlier ones.  */
  if (flag_dump_macros == 'M')
  if (flag_dump_macros == 'M')
    flag_no_output = 1;
    flag_no_output = 1;
 
 
  /* Disable -dD, -dN and -dI if normal output is suppressed.  Allow
  /* Disable -dD, -dN and -dI if normal output is suppressed.  Allow
     -dM since at least glibc relies on -M -dM to work.  */
     -dM since at least glibc relies on -M -dM to work.  */
  /* Also, flag_no_output implies flag_no_line_commands, always.  */
  /* Also, flag_no_output implies flag_no_line_commands, always.  */
  if (flag_no_output)
  if (flag_no_output)
    {
    {
      if (flag_dump_macros != 'M')
      if (flag_dump_macros != 'M')
        flag_dump_macros = 0;
        flag_dump_macros = 0;
      flag_dump_includes = 0;
      flag_dump_includes = 0;
      flag_no_line_commands = 1;
      flag_no_line_commands = 1;
    }
    }
 
 
  cpp_opts->unsigned_char = !flag_signed_char;
  cpp_opts->unsigned_char = !flag_signed_char;
  cpp_opts->stdc_0_in_system_headers = STDC_0_IN_SYSTEM_HEADERS;
  cpp_opts->stdc_0_in_system_headers = STDC_0_IN_SYSTEM_HEADERS;
 
 
  /* We want -Wno-long-long to override -pedantic -std=non-c99
  /* We want -Wno-long-long to override -pedantic -std=non-c99
     and/or -Wtraditional, whatever the ordering.  */
     and/or -Wtraditional, whatever the ordering.  */
  cpp_opts->warn_long_long
  cpp_opts->warn_long_long
    = warn_long_long && ((!flag_isoc99 && pedantic) || warn_traditional);
    = warn_long_long && ((!flag_isoc99 && pedantic) || warn_traditional);
 
 
  /* Similarly with -Wno-variadic-macros.  No check for c99 here, since
  /* Similarly with -Wno-variadic-macros.  No check for c99 here, since
     this also turns off warnings about GCCs extension.  */
     this also turns off warnings about GCCs extension.  */
  cpp_opts->warn_variadic_macros
  cpp_opts->warn_variadic_macros
    = warn_variadic_macros && (pedantic || warn_traditional);
    = warn_variadic_macros && (pedantic || warn_traditional);
 
 
  /* If we're generating preprocessor output, emit current directory
  /* If we're generating preprocessor output, emit current directory
     if explicitly requested or if debugging information is enabled.
     if explicitly requested or if debugging information is enabled.
     ??? Maybe we should only do it for debugging formats that
     ??? Maybe we should only do it for debugging formats that
     actually output the current directory?  */
     actually output the current directory?  */
  if (flag_working_directory == -1)
  if (flag_working_directory == -1)
    flag_working_directory = (debug_info_level != DINFO_LEVEL_NONE);
    flag_working_directory = (debug_info_level != DINFO_LEVEL_NONE);
}
}
 
 
/* Add include path with a prefix at the front of its name.  */
/* Add include path with a prefix at the front of its name.  */
static void
static void
add_prefixed_path (const char *suffix, size_t chain)
add_prefixed_path (const char *suffix, size_t chain)
{
{
  char *path;
  char *path;
  const char *prefix;
  const char *prefix;
  size_t prefix_len, suffix_len;
  size_t prefix_len, suffix_len;
 
 
  suffix_len = strlen (suffix);
  suffix_len = strlen (suffix);
  prefix     = iprefix ? iprefix : cpp_GCC_INCLUDE_DIR;
  prefix     = iprefix ? iprefix : cpp_GCC_INCLUDE_DIR;
  prefix_len = iprefix ? strlen (iprefix) : cpp_GCC_INCLUDE_DIR_len;
  prefix_len = iprefix ? strlen (iprefix) : cpp_GCC_INCLUDE_DIR_len;
 
 
  path = (char *) xmalloc (prefix_len + suffix_len + 1);
  path = (char *) xmalloc (prefix_len + suffix_len + 1);
  memcpy (path, prefix, prefix_len);
  memcpy (path, prefix, prefix_len);
  memcpy (path + prefix_len, suffix, suffix_len);
  memcpy (path + prefix_len, suffix, suffix_len);
  path[prefix_len + suffix_len] = '\0';
  path[prefix_len + suffix_len] = '\0';
 
 
  add_path (path, chain, 0, false);
  add_path (path, chain, 0, false);
}
}
 
 
/* Handle -D, -U, -A, -imacros, and the first -include.  */
/* Handle -D, -U, -A, -imacros, and the first -include.  */
static void
static void
finish_options (void)
finish_options (void)
{
{
  if (!cpp_opts->preprocessed)
  if (!cpp_opts->preprocessed)
    {
    {
      size_t i;
      size_t i;
 
 
      cb_file_change (parse_in,
      cb_file_change (parse_in,
                      linemap_add (&line_table, LC_RENAME, 0,
                      linemap_add (&line_table, LC_RENAME, 0,
                                   _("<built-in>"), 0));
                                   _("<built-in>"), 0));
 
 
      cpp_init_builtins (parse_in, flag_hosted);
      cpp_init_builtins (parse_in, flag_hosted);
      c_cpp_builtins (parse_in);
      c_cpp_builtins (parse_in);
 
 
      /* We're about to send user input to cpplib, so make it warn for
      /* We're about to send user input to cpplib, so make it warn for
         things that we previously (when we sent it internal definitions)
         things that we previously (when we sent it internal definitions)
         told it to not warn.
         told it to not warn.
 
 
         C99 permits implementation-defined characters in identifiers.
         C99 permits implementation-defined characters in identifiers.
         The documented meaning of -std= is to turn off extensions that
         The documented meaning of -std= is to turn off extensions that
         conflict with the specified standard, and since a strictly
         conflict with the specified standard, and since a strictly
         conforming program cannot contain a '$', we do not condition
         conforming program cannot contain a '$', we do not condition
         their acceptance on the -std= setting.  */
         their acceptance on the -std= setting.  */
      cpp_opts->warn_dollars = (cpp_opts->pedantic && !cpp_opts->c99);
      cpp_opts->warn_dollars = (cpp_opts->pedantic && !cpp_opts->c99);
 
 
      cb_file_change (parse_in,
      cb_file_change (parse_in,
                      linemap_add (&line_table, LC_RENAME, 0,
                      linemap_add (&line_table, LC_RENAME, 0,
                                   _("<command-line>"), 0));
                                   _("<command-line>"), 0));
 
 
      for (i = 0; i < deferred_count; i++)
      for (i = 0; i < deferred_count; i++)
        {
        {
          struct deferred_opt *opt = &deferred_opts[i];
          struct deferred_opt *opt = &deferred_opts[i];
 
 
          if (opt->code == OPT_D)
          if (opt->code == OPT_D)
            cpp_define (parse_in, opt->arg);
            cpp_define (parse_in, opt->arg);
          else if (opt->code == OPT_U)
          else if (opt->code == OPT_U)
            cpp_undef (parse_in, opt->arg);
            cpp_undef (parse_in, opt->arg);
          else if (opt->code == OPT_A)
          else if (opt->code == OPT_A)
            {
            {
              if (opt->arg[0] == '-')
              if (opt->arg[0] == '-')
                cpp_unassert (parse_in, opt->arg + 1);
                cpp_unassert (parse_in, opt->arg + 1);
              else
              else
                cpp_assert (parse_in, opt->arg);
                cpp_assert (parse_in, opt->arg);
            }
            }
        }
        }
 
 
      /* Handle -imacros after -D and -U.  */
      /* Handle -imacros after -D and -U.  */
      for (i = 0; i < deferred_count; i++)
      for (i = 0; i < deferred_count; i++)
        {
        {
          struct deferred_opt *opt = &deferred_opts[i];
          struct deferred_opt *opt = &deferred_opts[i];
 
 
          if (opt->code == OPT_imacros
          if (opt->code == OPT_imacros
              && cpp_push_include (parse_in, opt->arg))
              && cpp_push_include (parse_in, opt->arg))
            {
            {
              /* Disable push_command_line_include callback for now.  */
              /* Disable push_command_line_include callback for now.  */
              include_cursor = deferred_count + 1;
              include_cursor = deferred_count + 1;
              cpp_scan_nooutput (parse_in);
              cpp_scan_nooutput (parse_in);
            }
            }
        }
        }
    }
    }
 
 
  include_cursor = 0;
  include_cursor = 0;
  push_command_line_include ();
  push_command_line_include ();
}
}
 
 
/* Give CPP the next file given by -include, if any.  */
/* Give CPP the next file given by -include, if any.  */
static void
static void
push_command_line_include (void)
push_command_line_include (void)
{
{
  while (include_cursor < deferred_count)
  while (include_cursor < deferred_count)
    {
    {
      struct deferred_opt *opt = &deferred_opts[include_cursor++];
      struct deferred_opt *opt = &deferred_opts[include_cursor++];
 
 
      if (!cpp_opts->preprocessed && opt->code == OPT_include
      if (!cpp_opts->preprocessed && opt->code == OPT_include
          && cpp_push_include (parse_in, opt->arg))
          && cpp_push_include (parse_in, opt->arg))
        return;
        return;
    }
    }
 
 
  if (include_cursor == deferred_count)
  if (include_cursor == deferred_count)
    {
    {
      include_cursor++;
      include_cursor++;
      /* -Wunused-macros should only warn about macros defined hereafter.  */
      /* -Wunused-macros should only warn about macros defined hereafter.  */
      cpp_opts->warn_unused_macros = warn_unused_macros;
      cpp_opts->warn_unused_macros = warn_unused_macros;
      /* Restore the line map from <command line>.  */
      /* Restore the line map from <command line>.  */
      if (!cpp_opts->preprocessed)
      if (!cpp_opts->preprocessed)
        cpp_change_file (parse_in, LC_RENAME, this_input_filename);
        cpp_change_file (parse_in, LC_RENAME, this_input_filename);
 
 
      /* Set this here so the client can change the option if it wishes,
      /* Set this here so the client can change the option if it wishes,
         and after stacking the main file so we don't trace the main file.  */
         and after stacking the main file so we don't trace the main file.  */
      line_table.trace_includes = cpp_opts->print_include_names;
      line_table.trace_includes = cpp_opts->print_include_names;
    }
    }
}
}
 
 
/* File change callback.  Has to handle -include files.  */
/* File change callback.  Has to handle -include files.  */
static void
static void
cb_file_change (cpp_reader * ARG_UNUSED (pfile),
cb_file_change (cpp_reader * ARG_UNUSED (pfile),
                const struct line_map *new_map)
                const struct line_map *new_map)
{
{
  if (flag_preprocess_only)
  if (flag_preprocess_only)
    pp_file_change (new_map);
    pp_file_change (new_map);
  else
  else
    fe_file_change (new_map);
    fe_file_change (new_map);
 
 
  if (new_map == 0 || (new_map->reason == LC_LEAVE && MAIN_FILE_P (new_map)))
  if (new_map == 0 || (new_map->reason == LC_LEAVE && MAIN_FILE_P (new_map)))
    push_command_line_include ();
    push_command_line_include ();
}
}
 
 
void
void
cb_dir_change (cpp_reader * ARG_UNUSED (pfile), const char *dir)
cb_dir_change (cpp_reader * ARG_UNUSED (pfile), const char *dir)
{
{
  if (!set_src_pwd (dir))
  if (!set_src_pwd (dir))
    warning (0, "too late for # directive to set debug directory");
    warning (0, "too late for # directive to set debug directory");
}
}
 
 
/* Set the C 89 standard (with 1994 amendments if C94, without GNU
/* Set the C 89 standard (with 1994 amendments if C94, without GNU
   extensions if ISO).  There is no concept of gnu94.  */
   extensions if ISO).  There is no concept of gnu94.  */
static void
static void
set_std_c89 (int c94, int iso)
set_std_c89 (int c94, int iso)
{
{
  cpp_set_lang (parse_in, c94 ? CLK_STDC94: iso ? CLK_STDC89: CLK_GNUC89);
  cpp_set_lang (parse_in, c94 ? CLK_STDC94: iso ? CLK_STDC89: CLK_GNUC89);
  flag_iso = iso;
  flag_iso = iso;
  flag_no_asm = iso;
  flag_no_asm = iso;
  flag_no_gnu_keywords = iso;
  flag_no_gnu_keywords = iso;
  flag_no_nonansi_builtin = iso;
  flag_no_nonansi_builtin = iso;
  flag_isoc94 = c94;
  flag_isoc94 = c94;
  flag_isoc99 = 0;
  flag_isoc99 = 0;
}
}
 
 
/* Set the C 99 standard (without GNU extensions if ISO).  */
/* Set the C 99 standard (without GNU extensions if ISO).  */
static void
static void
set_std_c99 (int iso)
set_std_c99 (int iso)
{
{
  cpp_set_lang (parse_in, iso ? CLK_STDC99: CLK_GNUC99);
  cpp_set_lang (parse_in, iso ? CLK_STDC99: CLK_GNUC99);
  flag_no_asm = iso;
  flag_no_asm = iso;
  flag_no_nonansi_builtin = iso;
  flag_no_nonansi_builtin = iso;
  flag_iso = iso;
  flag_iso = iso;
  flag_isoc99 = 1;
  flag_isoc99 = 1;
  flag_isoc94 = 1;
  flag_isoc94 = 1;
}
}
 
 
/* Set the C++ 98 standard (without GNU extensions if ISO).  */
/* Set the C++ 98 standard (without GNU extensions if ISO).  */
static void
static void
set_std_cxx98 (int iso)
set_std_cxx98 (int iso)
{
{
  cpp_set_lang (parse_in, iso ? CLK_CXX98: CLK_GNUCXX);
  cpp_set_lang (parse_in, iso ? CLK_CXX98: CLK_GNUCXX);
  flag_no_gnu_keywords = iso;
  flag_no_gnu_keywords = iso;
  flag_no_nonansi_builtin = iso;
  flag_no_nonansi_builtin = iso;
  flag_iso = iso;
  flag_iso = iso;
}
}
 
 
/* Handle setting implicit to ON.  */
/* Handle setting implicit to ON.  */
static void
static void
set_Wimplicit (int on)
set_Wimplicit (int on)
{
{
  warn_implicit = on;
  warn_implicit = on;
  warn_implicit_int = on;
  warn_implicit_int = on;
  if (on)
  if (on)
    {
    {
      if (mesg_implicit_function_declaration != 2)
      if (mesg_implicit_function_declaration != 2)
        mesg_implicit_function_declaration = 1;
        mesg_implicit_function_declaration = 1;
    }
    }
  else
  else
    mesg_implicit_function_declaration = 0;
    mesg_implicit_function_declaration = 0;
}
}
 
 
/* Args to -d specify what to dump.  Silently ignore
/* Args to -d specify what to dump.  Silently ignore
   unrecognized options; they may be aimed at toplev.c.  */
   unrecognized options; they may be aimed at toplev.c.  */
static void
static void
handle_OPT_d (const char *arg)
handle_OPT_d (const char *arg)
{
{
  char c;
  char c;
 
 
  while ((c = *arg++) != '\0')
  while ((c = *arg++) != '\0')
    switch (c)
    switch (c)
      {
      {
      case 'M':                 /* Dump macros only.  */
      case 'M':                 /* Dump macros only.  */
      case 'N':                 /* Dump names.  */
      case 'N':                 /* Dump names.  */
      case 'D':                 /* Dump definitions.  */
      case 'D':                 /* Dump definitions.  */
        flag_dump_macros = c;
        flag_dump_macros = c;
        break;
        break;
 
 
      case 'I':
      case 'I':
        flag_dump_includes = 1;
        flag_dump_includes = 1;
        break;
        break;
      }
      }
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.