OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [fixincludes/] [fixopts.c] - Blame information for rev 585

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 38 julius
/* Handle options that are passed from environment variables.
2
 
3
   Copyright (C) 2004 Free Software Foundation, Inc.
4
 
5
This file is part of GCC.
6
 
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 2, or (at your option)
10
any later version.
11
 
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.
16
 
17
You should have received a copy of the GNU General Public License
18
along with GCC; see the file COPYING.  If not, write to
19
the Free Software Foundation, 51 Franklin Street, Fifth Floor,
20
Boston, MA 02110-1301, USA.  */
21
 
22
#include "fixlib.h"
23
 
24
#define _ENV_(v,m,n,t)   tCC* v = NULL;
25
ENV_TABLE
26
#undef _ENV_
27
 
28
void
29
initialize_opts (void)
30
{
31
  static const char var_not_found[] =
32
#ifndef __STDC__
33
    "fixincl ERROR:  %s environment variable not defined\n"
34
#else
35
    "fixincl ERROR:  %s environment variable not defined\n"
36
    "each of these must be defined:\n"
37
# define _ENV_(vv,mm,nn,tt) "\t" nn "  - " tt "\n"
38
  ENV_TABLE
39
# undef _ENV_
40
#endif
41
    ;
42
 
43
#define _ENV_(v,m,n,t)   { tSCC var[] = n;  \
44
  v = getenv (var); if (m && (v == NULL)) { \
45
  fprintf (stderr, var_not_found, var);     \
46
  exit (EXIT_FAILURE); } }
47
 
48
ENV_TABLE
49
 
50
#undef _ENV_
51
}

powered by: WebSVN 2.1.0

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