1 |
285 |
jeremybenn |
/* Contribution to the specs for the GNU Compiler Collection
|
2 |
|
|
from GNU Fortran 95 compiler.
|
3 |
|
|
Copyright (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008
|
4 |
|
|
Free Software Foundation, Inc.
|
5 |
|
|
|
6 |
|
|
This file is free software; you can redistribute it and/or modify
|
7 |
|
|
it under the terms of the GNU General Public License as published by
|
8 |
|
|
the Free Software Foundation; either version 3 of the License, or
|
9 |
|
|
(at your option) any later version.
|
10 |
|
|
|
11 |
|
|
This file is distributed in the hope that it will be useful,
|
12 |
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
13 |
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
14 |
|
|
GNU General Public License for more details.
|
15 |
|
|
|
16 |
|
|
You should have received a copy of the GNU General Public License
|
17 |
|
|
along with GCC; see the file COPYING3. If not see
|
18 |
|
|
<http://www.gnu.org/licenses/>. */
|
19 |
|
|
|
20 |
|
|
/* This is the contribution to the `default_compilers' array in gcc.c
|
21 |
|
|
for the f95 language. */
|
22 |
|
|
|
23 |
|
|
/* Identical to gcc.c (cpp_options), but omitting %(cpp_unique_options)
|
24 |
|
|
and -fpch-preprocess on -save-temps. */
|
25 |
|
|
#define CPP_ONLY_OPTIONS "%1 %{m*} %{f*} %{g*:%{!g0:%{g*} \
|
26 |
|
|
%{!fno-working-directory:-fworking-directory}}} \
|
27 |
|
|
%{std*&ansi&trigraphs} %{W*&pedantic*} %{w} \
|
28 |
|
|
%{O*} %{undef}"
|
29 |
|
|
|
30 |
|
|
/* Options that f951 should know about, even if not preprocessing. */
|
31 |
|
|
#define CPP_FORWARD_OPTIONS "%{i*} %{I*}"
|
32 |
|
|
|
33 |
|
|
#define F951_CPP_OPTIONS "%{!nocpp: -cpp %g.f90 %{E} %(cpp_unique_options) \
|
34 |
|
|
%{E|M|MM:%(cpp_debug_options) " CPP_ONLY_OPTIONS \
|
35 |
|
|
" -fsyntax-only};: " CPP_FORWARD_OPTIONS "}"
|
36 |
|
|
#define F951_OPTIONS "%(cc1_options) %{J*} \
|
37 |
|
|
%{!nostdinc:-fintrinsic-modules-path finclude%s}\
|
38 |
|
|
%{!fsyntax-only:%(invoke_as)}"
|
39 |
|
|
#define F951_SOURCE_FORM "%{!ffree-form:-ffixed-form}"
|
40 |
|
|
|
41 |
|
|
|
42 |
|
|
{".F", "@f77-cpp-input", 0, 0, 0},
|
43 |
|
|
{".FOR", "@f77-cpp-input", 0, 0, 0},
|
44 |
|
|
{".FTN", "@f77-cpp-input", 0, 0, 0},
|
45 |
|
|
{".fpp", "@f77-cpp-input", 0, 0, 0},
|
46 |
|
|
{".FPP", "@f77-cpp-input", 0, 0, 0},
|
47 |
|
|
{"@f77-cpp-input",
|
48 |
|
|
"f951 %i " F951_SOURCE_FORM " " \
|
49 |
|
|
F951_CPP_OPTIONS " %{!E:" F951_OPTIONS "}", 0, 0, 0},
|
50 |
|
|
{".f", "@f77", 0, 0, 0},
|
51 |
|
|
{".for", "@f77", 0, 0, 0},
|
52 |
|
|
{".ftn", "@f77", 0, 0, 0},
|
53 |
|
|
{"@f77",
|
54 |
|
|
"f951 %i " F951_SOURCE_FORM " \
|
55 |
|
|
%{E:%{!cpp:%egfortran does not support -E without -cpp}} \
|
56 |
|
|
%{cpp:" F951_CPP_OPTIONS ";: " CPP_FORWARD_OPTIONS "} \
|
57 |
|
|
%{!E:" F951_OPTIONS "}", 0, 0, 0},
|
58 |
|
|
{".F90", "@f95-cpp-input", 0, 0, 0},
|
59 |
|
|
{".F95", "@f95-cpp-input", 0, 0, 0},
|
60 |
|
|
{".F03", "@f95-cpp-input", 0, 0, 0},
|
61 |
|
|
{".F08", "@f95-cpp-input", 0, 0, 0},
|
62 |
|
|
{"@f95-cpp-input",
|
63 |
|
|
"f951 %i " F951_CPP_OPTIONS " %{!E:" F951_OPTIONS "}", 0, 0, 0},
|
64 |
|
|
{".f90", "@f95", 0, 0, 0},
|
65 |
|
|
{".f95", "@f95", 0, 0, 0},
|
66 |
|
|
{".f03", "@f95", 0, 0, 0},
|
67 |
|
|
{".f08", "@f95", 0, 0, 0},
|
68 |
|
|
{"@f95",
|
69 |
|
|
"f951 %i %{E:%{!cpp:%egfortran does not support -E without -cpp}}\
|
70 |
|
|
%{cpp:" F951_CPP_OPTIONS ";: " CPP_FORWARD_OPTIONS "} \
|
71 |
|
|
%{!E:" F951_OPTIONS "}", 0, 0, 0},
|
72 |
|
|
|
73 |
|
|
|
74 |
|
|
#undef CPP_ONLY_OPTIONS
|
75 |
|
|
#undef CPP_FORWARD_OPTIONS
|
76 |
|
|
#undef F951_SOURCE_FORM
|
77 |
|
|
#undef F951_CPP_OPTIONS
|
78 |
|
|
#undef F951_OPTIONS
|