240 lines
8.7 KiB
C
240 lines
8.7 KiB
C
/* lang-options.h file for Fortran
|
|
Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000 Free Software Foundation, Inc.
|
|
Contributed by James Craig Burley.
|
|
|
|
This file is part of GNU Fortran.
|
|
|
|
GNU Fortran 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 Software Foundation; either version 2, or (at your option)
|
|
any later version.
|
|
|
|
GNU Fortran is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with GNU Fortran; see the file COPYING. If not, write to
|
|
the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
|
|
02111-1307, USA.
|
|
|
|
*/
|
|
|
|
/* This is the contribution to the `documented_lang_options' array in
|
|
toplev.c for g77. */
|
|
|
|
#ifdef __STDC__ /* To be consistent with lang-specs.h. Maybe avoid
|
|
overflowing some old compiler's tables, etc. */
|
|
|
|
DEFINE_LANG_NAME ("Fortran")
|
|
|
|
{ "-fversion",
|
|
N_("Print g77-specific compiler version info, run internal tests") },
|
|
/*"-fident",*/
|
|
/*"-fno-ident",*/
|
|
{ "-ff66",
|
|
N_("Program is written in typical FORTRAN 66 dialect") },
|
|
{ "-fno-f66", "" },
|
|
{ "-ff77",
|
|
N_("Program is written in typical Unix f77 dialect") },
|
|
{ "-fno-f77",
|
|
N_("Program does not use Unix-f77 dialectal features") },
|
|
{ "-ff90",
|
|
N_("Program is written in Fortran-90-ish dialect") },
|
|
{ "-fno-f90", "" },
|
|
{ "-fautomatic", "" },
|
|
{ "-fno-automatic",
|
|
N_("Treat local vars and COMMON blocks as if they were named in SAVE statements") },
|
|
{ "-fdollar-ok",
|
|
N_("Allow $ in symbol names") },
|
|
{ "-fno-dollar-ok", "" },
|
|
{ "-ff2c", "" },
|
|
{ "-fno-f2c",
|
|
N_("f2c-compatible code need not be generated") },
|
|
{ "-ff2c-library", "" },
|
|
{ "-fno-f2c-library",
|
|
N_("Unsupported; do not generate libf2c-calling code") },
|
|
{ "-fflatten-arrays",
|
|
N_("Unsupported; affects code-generation of arrays") },
|
|
{ "-fno-flatten-arrays", "" },
|
|
{ "-ffree-form",
|
|
N_("Program is written in Fortran-90-ish free form") },
|
|
{ "-fno-free-form", "" },
|
|
{ "-ffixed-form", "" },
|
|
{ "-fno-fixed-form", "" },
|
|
{ "-fpedantic",
|
|
N_("Warn about use of (only a few for now) Fortran extensions") },
|
|
{ "-fno-pedantic", "" },
|
|
{ "-fvxt",
|
|
N_("Program is written in VXT (Digital-like) FORTRAN") },
|
|
{ "-fno-vxt", "" },
|
|
{ "-fno-ugly",
|
|
N_("Disallow all ugly features") },
|
|
{ "-fugly-args", "" },
|
|
{ "-fno-ugly-args",
|
|
N_("Hollerith and typeless constants not passed as arguments") },
|
|
{ "-fugly-assign",
|
|
N_("Allow ordinary copying of ASSIGN'ed vars") },
|
|
{ "-fno-ugly-assign", "" },
|
|
{ "-fugly-assumed",
|
|
N_("Dummy array dimensioned to (1) is assumed-size") },
|
|
{ "-fno-ugly-assumed", "" },
|
|
{ "-fugly-comma",
|
|
N_("Trailing comma in procedure call denotes null argument") },
|
|
{ "-fno-ugly-comma", "" },
|
|
{ "-fugly-complex",
|
|
N_("Allow REAL(Z) and AIMAG(Z) given DOUBLE COMPLEX Z") },
|
|
{ "-fno-ugly-complex", "" },
|
|
{ "-fugly-init", "" },
|
|
{ "-fno-ugly-init",
|
|
N_("Initialization via DATA and PARAMETER is type-compatible") },
|
|
{ "-fugly-logint",
|
|
N_("Allow INTEGER and LOGICAL interchangeability") },
|
|
{ "-fno-ugly-logint", "" },
|
|
{ "-fxyzzy",
|
|
N_("Print internal debugging-related info") },
|
|
{ "-fno-xyzzy", "" },
|
|
{ "-finit-local-zero",
|
|
N_("Initialize local vars and arrays to zero") },
|
|
{ "-fno-init-local-zero", "" },
|
|
{ "-fbackslash", "" },
|
|
{ "-fno-backslash",
|
|
N_("Backslashes in character/hollerith constants not special (C-style)") },
|
|
{ "-femulate-complex",
|
|
N_("Have front end emulate COMPLEX arithmetic to avoid bugs") },
|
|
{ "-fno-emulate-complex", "" },
|
|
{ "-funderscoring", "" },
|
|
{ "-fno-underscoring",
|
|
N_("Disable the appending of underscores to externals") },
|
|
{ "-fsecond-underscore", "" },
|
|
{ "-fno-second-underscore",
|
|
N_("Never append a second underscore to externals") },
|
|
{ "-fintrin-case-initcap",
|
|
N_("Intrinsics spelled as e.g. SqRt") },
|
|
{ "-fintrin-case-upper",
|
|
N_("Intrinsics in uppercase") },
|
|
{ "-fintrin-case-lower", "" },
|
|
{ "-fintrin-case-any",
|
|
N_("Intrinsics letters in arbitrary cases") },
|
|
{ "-fmatch-case-initcap",
|
|
N_("Language keywords spelled as e.g. IOStat") },
|
|
{ "-fmatch-case-upper",
|
|
N_("Language keywords in uppercase") },
|
|
{ "-fmatch-case-lower", "" },
|
|
{ "-fmatch-case-any",
|
|
N_("Language keyword letters in arbitrary cases") },
|
|
{ "-fsource-case-upper",
|
|
N_("Internally convert most source to uppercase") },
|
|
{ "-fsource-case-lower", "" },
|
|
{ "-fsource-case-preserve",
|
|
N_("Internally preserve source case") },
|
|
{ "-fsymbol-case-initcap",
|
|
N_("Symbol names spelled in mixed case") },
|
|
{ "-fsymbol-case-upper",
|
|
N_("Symbol names in uppercase") },
|
|
{ "-fsymbol-case-lower",
|
|
N_("Symbol names in lowercase") },
|
|
{ "-fsymbol-case-any", "" },
|
|
{ "-fcase-strict-upper",
|
|
N_("Program written in uppercase") },
|
|
{ "-fcase-strict-lower",
|
|
N_("Program written in lowercase") },
|
|
{ "-fcase-initcap",
|
|
N_("Program written in strict mixed-case") },
|
|
{ "-fcase-upper",
|
|
N_("Compile as if program written in uppercase") },
|
|
{ "-fcase-lower",
|
|
N_("Compile as if program written in lowercase") },
|
|
{ "-fcase-preserve",
|
|
N_("Preserve all spelling (case) used in program") },
|
|
{ "-fbadu77-intrinsics-delete",
|
|
N_("Delete libU77 intrinsics with bad interfaces") },
|
|
{ "-fbadu77-intrinsics-disable",
|
|
N_("Disable libU77 intrinsics with bad interfaces") },
|
|
{ "-fbadu77-intrinsics-enable", "" },
|
|
{ "-fbadu77-intrinsics-hide",
|
|
N_("Hide libU77 intrinsics with bad interfaces") },
|
|
{ "-ff2c-intrinsics-delete",
|
|
N_("Delete non-FORTRAN-77 intrinsics f2c supports") },
|
|
{ "-ff2c-intrinsics-disable",
|
|
N_("Disable non-FORTRAN-77 intrinsics f2c supports") },
|
|
{ "-ff2c-intrinsics-enable", "" },
|
|
{ "-ff2c-intrinsics-hide",
|
|
N_("Hide non-FORTRAN-77 intrinsics f2c supports") },
|
|
{ "-ff90-intrinsics-delete",
|
|
N_("Delete non-FORTRAN-77 intrinsics F90 supports") },
|
|
{ "-ff90-intrinsics-disable",
|
|
N_("Disable non-FORTRAN-77 intrinsics F90 supports") },
|
|
{ "-ff90-intrinsics-enable", "" },
|
|
{ "-ff90-intrinsics-hide",
|
|
N_("Hide non-FORTRAN-77 intrinsics F90 supports") },
|
|
{ "-fgnu-intrinsics-delete",
|
|
N_("Delete non-FORTRAN-77 intrinsics g77 supports") },
|
|
{ "-fgnu-intrinsics-disable",
|
|
N_("Disable non-FORTRAN 77 intrinsics F90 supports") },
|
|
{ "-fgnu-intrinsics-enable", "" },
|
|
{ "-fgnu-intrinsics-hide",
|
|
N_("Hide non-FORTRAN 77 intrinsics F90 supports") },
|
|
{ "-fmil-intrinsics-delete",
|
|
N_("Delete MIL-STD 1753 intrinsics") },
|
|
{ "-fmil-intrinsics-disable",
|
|
N_("Disable MIL-STD 1753 intrinsics") },
|
|
{ "-fmil-intrinsics-enable", "" },
|
|
{ "-fmil-intrinsics-hide",
|
|
N_("Hide MIL-STD 1753 intrinsics") },
|
|
{ "-funix-intrinsics-delete",
|
|
N_("Delete libU77 intrinsics") },
|
|
{ "-funix-intrinsics-disable",
|
|
N_("Disable libU77 intrinsics") },
|
|
{ "-funix-intrinsics-enable", "" },
|
|
{ "-funix-intrinsics-hide",
|
|
N_("Hide libU77 intrinsics") },
|
|
{ "-fvxt-intrinsics-delete",
|
|
N_("Delete non-FORTRAN-77 intrinsics VXT FORTRAN supports") },
|
|
{ "-fvxt-intrinsics-disable",
|
|
N_("Disable non-FORTRAN-77 intrinsics VXT FORTRAN supports") },
|
|
{ "-fvxt-intrinsics-enable", "" },
|
|
{ "-fvxt-intrinsics-hide",
|
|
N_("Hide non-FORTRAN-77 intrinsics VXT FORTRAN supports") },
|
|
{ "-fzeros",
|
|
N_("Treat initial values of 0 like non-zero values") },
|
|
{ "-fno-zeros", "" },
|
|
{ "-fdebug-kludge",
|
|
N_("Emit special debugging information for COMMON and EQUIVALENCE (disabled)") },
|
|
{ "-fno-debug-kludge", "" },
|
|
{ "-fonetrip",
|
|
N_("Take at least one trip through each iterative DO loop") },
|
|
{ "-fno-onetrip", "" },
|
|
{ "-fsilent", "" },
|
|
{ "-fno-silent",
|
|
N_("Print names of program units as they are compiled") },
|
|
{ "-fglobals", "" },
|
|
{ "-fno-globals",
|
|
N_("Disable fatal diagnostics about inter-procedural problems") },
|
|
{ "-ftypeless-boz",
|
|
N_("Make prefix-radix non-decimal constants be typeless") },
|
|
{ "-fno-typeless-boz", "" },
|
|
{ "-fbounds-check",
|
|
N_("Generate code to check subscript and substring bounds") },
|
|
{ "-fno-bounds-check", "" },
|
|
{ "-ffortran-bounds-check",
|
|
N_("Fortran-specific form of -fbounds-check") },
|
|
{ "-fno-fortran-bounds-check", "" },
|
|
{ "-Wglobals", "" },
|
|
{ "-Wno-globals",
|
|
N_("Disable warnings about inter-procedural problems") },
|
|
/*"-Wimplicit",*/
|
|
/*"-Wno-implicit",*/
|
|
{ "-Wsurprising",
|
|
N_("Warn about constructs with surprising meanings") },
|
|
{ "-Wno-surprising", "" },
|
|
/*"-Wall",*/
|
|
/* Prefix options. */
|
|
{ "-I",
|
|
N_("Add a directory for INCLUDE searching") },
|
|
{ "-ffixed-line-length-",
|
|
N_("Set the maximum line length") },
|
|
|
|
#endif
|