[Ada] Fix scope of block in expanded protected entry body
[official-gcc.git] / fixincludes / fixopts.c
blob0ea32568367e43135bfccc01c0b2c90895cade14
1 /* Handle options that are passed from environment variables.
3 Copyright (C) 2004, 2009, 2012 Free Software Foundation, Inc.
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3, or (at your option)
10 any later version.
12 GCC is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3. If not see
19 <http://www.gnu.org/licenses/>. */
21 #include "fixlib.h"
23 te_verbose verbose_level = VERB_PROGRESS;
25 fixinc_mode_t fixinc_mode = TESTING_OFF;
27 #define _ENV_(v,m,n,t) char const * v = NULL;
28 ENV_TABLE
29 #undef _ENV_
31 static void
32 show_not_def (char const * vname)
34 static const char var_not_found[] =
35 "fixincl ERROR: %s environment variable not defined\n"
36 "each of these must be defined:\n";
37 static char const not_found_var[] = "\t%s\n";
39 fprintf (stderr, var_not_found, vname);
40 # define _ENV_(vv,mm,nn,tt) \
41 if (mm) fprintf (stderr, not_found_var, nn);
42 ENV_TABLE
43 # undef _ENV_
45 exit (EXIT_FAILURE);
48 void
49 initialize_opts (void)
51 #define _ENV_(v,m,n,t) { \
52 static char const var[] = n; \
53 v = getenv (var); \
54 if (m && (v == NULL)) show_not_def (var); \
57 ENV_TABLE;
58 #undef _ENV_
60 if ((pz_test_mode != NULL) && (strcmp (pz_test_mode, "true") == 0))
61 fixinc_mode = TESTING_ON;