1 /* lang-options.h file for Fortran
2 Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
3 Contributed by James Craig Burley.
5 This file is part of GNU Fortran.
7 GNU Fortran 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)
12 GNU Fortran 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 GNU Fortran; see the file COPYING. If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
24 /* This is the contribution to the `documented_lang_options' array in
27 #ifdef __STDC__ /* To be consistent with lang-specs.h. Maybe avoid
28 overflowing some old compiler's tables, etc. */
30 DEFINE_LANG_NAME ("Fortran")
33 N_("Print g77-specific compiler version info, run internal tests") },
34 { "-fnull-version", "" },
38 N_("Program is written in typical FORTRAN 66 dialect") },
41 N_("Program is written in typical Unix f77 dialect") },
43 N_("Program does not use Unix-f77 dialectal features") },
45 N_("Program is written in Fortran-90-ish dialect") },
47 { "-fautomatic", "" },
49 N_("Treat local vars and COMMON blocks as if they were named in SAVE statements") },
51 N_("Allow $ in symbol names") },
52 { "-fno-dollar-ok", "" },
55 N_("f2c-compatible code need not be generated") },
56 { "-ff2c-library", "" },
58 N_("Unsupported; do not generate libf2c-calling code") },
60 N_("Unsupported; affects code-generation of arrays") },
61 { "-fno-flatten-arrays", "" },
63 N_("Program is written in Fortran-90-ish free form") },
64 { "-fno-free-form", "" },
65 { "-ffixed-form", "" },
66 { "-fno-fixed-form", "" },
68 N_("Warn about use of (only a few for now) Fortran extensions") },
69 { "-fno-pedantic", "" },
71 N_("Program is written in VXT (Digital-like) FORTRAN") },
74 N_("Disallow all ugly features") },
75 { "-fugly-args", "" },
77 N_("Hollerith and typeless constants not passed as arguments") },
79 N_("Allow ordinary copying of ASSIGN'ed vars") },
80 { "-fno-ugly-assign", "" },
82 N_("Dummy array dimensioned to (1) is assumed-size") },
83 { "-fno-ugly-assumed", "" },
85 N_("Trailing comma in procedure call denotes null argument") },
86 { "-fno-ugly-comma", "" },
88 N_("Allow REAL(Z) and AIMAG(Z) given DOUBLE COMPLEX Z") },
89 { "-fno-ugly-complex", "" },
90 { "-fugly-init", "" },
92 N_("Initialization via DATA and PARAMETER is type-compatible") },
94 N_("Allow INTEGER and LOGICAL interchangeability") },
95 { "-fno-ugly-logint", "" },
97 N_("Print internal debugging-related info") },
99 { "-finit-local-zero",
100 N_("Initialize local vars and arrays to zero") },
101 { "-fno-init-local-zero", "" },
102 { "-fbackslash", "" },
104 N_("Backslashes in character/hollerith constants not special (C-style)") },
105 { "-femulate-complex",
106 N_("Have front end emulate COMPLEX arithmetic to avoid bugs") },
107 { "-fno-emulate-complex", "" },
108 { "-funderscoring", "" },
109 { "-fno-underscoring",
110 N_("Disable the appending of underscores to externals") },
111 { "-fsecond-underscore", "" },
112 { "-fno-second-underscore",
113 N_("Never append a second underscore to externals") },
114 { "-fintrin-case-initcap",
115 N_("Intrinsics spelled as e.g. SqRt") },
116 { "-fintrin-case-upper",
117 N_("Intrinsics in uppercase") },
118 { "-fintrin-case-lower", "" },
119 { "-fintrin-case-any",
120 N_("Intrinsics letters in arbitrary cases") },
121 { "-fmatch-case-initcap",
122 N_("Language keywords spelled as e.g. IOStat") },
123 { "-fmatch-case-upper",
124 N_("Language keywords in uppercase") },
125 { "-fmatch-case-lower", "" },
126 { "-fmatch-case-any",
127 N_("Language keyword letters in arbitrary cases") },
128 { "-fsource-case-upper",
129 N_("Internally convert most source to uppercase") },
130 { "-fsource-case-lower", "" },
131 { "-fsource-case-preserve",
132 N_("Internally preserve source case") },
133 { "-fsymbol-case-initcap",
134 N_("Symbol names spelled in mixed case") },
135 { "-fsymbol-case-upper",
136 N_("Symbol names in uppercase") },
137 { "-fsymbol-case-lower",
138 N_("Symbol names in lowercase") },
139 { "-fsymbol-case-any", "" },
140 { "-fcase-strict-upper",
141 N_("Program written in uppercase") },
142 { "-fcase-strict-lower",
143 N_("Program written in lowercase") },
145 N_("Program written in strict mixed-case") },
147 N_("Compile as if program written in uppercase") },
149 N_("Compile as if program written in lowercase") },
151 N_("Preserve all spelling (case) used in program") },
152 { "-fbadu77-intrinsics-delete",
153 N_("Delete libU77 intrinsics with bad interfaces") },
154 { "-fbadu77-intrinsics-disable",
155 N_("Disable libU77 intrinsics with bad interfaces") },
156 { "-fbadu77-intrinsics-enable", "" },
157 { "-fbadu77-intrinsics-hide",
158 N_("Hide libU77 intrinsics with bad interfaces") },
159 { "-ff2c-intrinsics-delete",
160 N_("Delete non-FORTRAN-77 intrinsics f2c supports") },
161 { "-ff2c-intrinsics-disable",
162 N_("Disable non-FORTRAN-77 intrinsics f2c supports") },
163 { "-ff2c-intrinsics-enable", "" },
164 { "-ff2c-intrinsics-hide",
165 N_("Hide non-FORTRAN-77 intrinsics f2c supports") },
166 { "-ff90-intrinsics-delete",
167 N_("Delete non-FORTRAN-77 intrinsics F90 supports") },
168 { "-ff90-intrinsics-disable",
169 N_("Disable non-FORTRAN-77 intrinsics F90 supports") },
170 { "-ff90-intrinsics-enable", "" },
171 { "-ff90-intrinsics-hide",
172 N_("Hide non-FORTRAN-77 intrinsics F90 supports") },
173 { "-fgnu-intrinsics-delete",
174 N_("Delete non-FORTRAN-77 intrinsics g77 supports") },
175 { "-fgnu-intrinsics-disable",
176 N_("Disable non-FORTRAN 77 intrinsics F90 supports") },
177 { "-fgnu-intrinsics-enable", "" },
178 { "-fgnu-intrinsics-hide",
179 N_("Hide non-FORTRAN 77 intrinsics F90 supports") },
180 { "-fmil-intrinsics-delete",
181 N_("Delete MIL-STD 1753 intrinsics") },
182 { "-fmil-intrinsics-disable",
183 N_("Disable MIL-STD 1753 intrinsics") },
184 { "-fmil-intrinsics-enable", "" },
185 { "-fmil-intrinsics-hide",
186 N_("Hide MIL-STD 1753 intrinsics") },
187 { "-funix-intrinsics-delete",
188 N_("Delete libU77 intrinsics") },
189 { "-funix-intrinsics-disable",
190 N_("Disable libU77 intrinsics") },
191 { "-funix-intrinsics-enable", "" },
192 { "-funix-intrinsics-hide",
193 N_("Hide libU77 intrinsics") },
194 { "-fvxt-intrinsics-delete",
195 N_("Delete non-FORTRAN-77 intrinsics VXT FORTRAN supports") },
196 { "-fvxt-intrinsics-disable",
197 N_("Disable non-FORTRAN-77 intrinsics VXT FORTRAN supports") },
198 { "-fvxt-intrinsics-enable", "" },
199 { "-fvxt-intrinsics-hide",
200 N_("Hide non-FORTRAN-77 intrinsics VXT FORTRAN supports") },
202 N_("Treat initial values of 0 like non-zero values") },
203 { "-fno-zeros", "" },
205 N_("Emit special debugging information for COMMON and EQUIVALENCE (disabled)") },
206 { "-fno-debug-kludge", "" },
208 N_("Take at least one trip through each iterative DO loop") },
209 { "-fno-onetrip", "" },
212 N_("Print names of program units as they are compiled") },
215 N_("Disable fatal diagnostics about inter-procedural problems") },
217 N_("Make prefix-radix non-decimal constants be typeless") },
218 { "-fno-typeless-boz", "" },
220 N_("Generate code to check subscript and substring bounds") },
221 { "-fno-bounds-check", "" },
222 { "-ffortran-bounds-check",
223 N_("Fortran-specific form of -fbounds-check") },
224 { "-fno-fortran-bounds-check", "" },
227 N_("Disable warnings about inter-procedural problems") },
231 N_("Warn about constructs with surprising meanings") },
232 { "-Wno-surprising", "" },
234 /* Prefix options. */
236 N_("Add a directory for INCLUDE searching") },
237 { "-ffixed-line-length-",
238 N_("Set the maximum line length") },