diff options
| author | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2009-05-16 16:11:11 +0000 |
|---|---|---|
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2009-05-16 16:11:11 +0000 |
| commit | cab129d134930fe2a1f97a3a005df39d370bdfa0 (patch) | |
| tree | 0aae8d8c20e5648928c65ad4486f31d06536d940 /gcc | |
| parent | 70544f4432779bad70c93beaf404a34479f6fdd8 (diff) | |
| download | gcc-cab129d134930fe2a1f97a3a005df39d370bdfa0.zip gcc-cab129d134930fe2a1f97a3a005df39d370bdfa0.tar.gz gcc-cab129d134930fe2a1f97a3a005df39d370bdfa0.tar.bz2 | |
re PR fortran/36031 (ARM -fshort-enums attribute not emitted for Fortran)
PR fortran/36031
* decl.c (set_enum_kind): Use global short-enums flag.
* gfortran.h (gfc_option_t): Remove short_enums flag.
* lang.opt (-fshort-enums): Refer to C documentation.
* options.c (gfc_init_options, gfc_handle_option): Use global
short-enums flag.
From-SVN: r147615
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/decl.c | 3 | ||||
| -rw-r--r-- | gcc/fortran/gfortran.h | 1 | ||||
| -rw-r--r-- | gcc/fortran/lang.opt | 2 | ||||
| -rw-r--r-- | gcc/fortran/options.c | 4 |
4 files changed, 5 insertions, 5 deletions
diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c index a5261b8..7ecb921 100644 --- a/gcc/fortran/decl.c +++ b/gcc/fortran/decl.c @@ -24,6 +24,7 @@ along with GCC; see the file COPYING3. If not see #include "gfortran.h" #include "match.h" #include "parse.h" +#include "flags.h" /* Macros to access allocate memory for gfc_data_variable, @@ -5295,7 +5296,7 @@ set_enum_kind(void) if (max_enum == NULL || enum_history == NULL) return; - if (!gfc_option.fshort_enums) + if (!flag_short_enums) return; i = 0; diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index bc066bc..b38af18 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -2060,7 +2060,6 @@ typedef struct int warn_std; int allow_std; - int fshort_enums; int convert; int record_marker; int max_subrecord_length; diff --git a/gcc/fortran/lang.opt b/gcc/fortran/lang.opt index 9da290c..d29ddde 100644 --- a/gcc/fortran/lang.opt +++ b/gcc/fortran/lang.opt @@ -350,7 +350,7 @@ Append a second underscore if the name already contains an underscore fshort-enums Fortran -Use the narrowest integer type possible for enumeration types +; Documented in C fsign-zero Fortran diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index 65841f6..2d899f5 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -137,7 +137,7 @@ gfc_init_options (unsigned int argc, const char **argv) set_default_std_flags (); /* -fshort-enums can be default on some targets. */ - gfc_option.fshort_enums = targetm.default_short_enums (); + flag_short_enums = targetm.default_short_enums (); /* Initialize cpp-related options. */ gfc_cpp_init_options(argc, argv); @@ -858,7 +858,7 @@ gfc_handle_option (size_t scode, const char *arg, int value) break; case OPT_fshort_enums: - gfc_option.fshort_enums = 1; + flag_short_enums = 1; break; case OPT_fconvert_little_endian: |