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