diff options
author | Dominique d'Humieres <dominiq@gcc.gnu.org> | 2019-01-19 22:45:43 +0100 |
---|---|---|
committer | Dominique d'Humieres <dominiq@gcc.gnu.org> | 2019-01-19 22:45:43 +0100 |
commit | b4e17cadd5ba54fadb2986496025f8d96475dc32 (patch) | |
tree | 675a16ff081d665f7c253173bd95cb3ef392aa58 /gcc/fortran/resolve.c | |
parent | 5131b898e57d363420c0af03a4edd052b5c3fa05 (diff) | |
download | gcc-b4e17cadd5ba54fadb2986496025f8d96475dc32.zip gcc-b4e17cadd5ba54fadb2986496025f8d96475dc32.tar.gz gcc-b4e17cadd5ba54fadb2986496025f8d96475dc32.tar.bz2 |
[multiple changes]
2019-01-19 Dominique d'Humieres <dominiq@gcc.gnu.org>
PR fortran/37835
* resolve.c (resolve_types): Add !flag_automatic.
* symbol.c (gfc_add_save): Silence warnings.
2019-01-18 Dominique d'Humieres <dominiq@gcc.gnu.org>
PR fortran/37835
* gfortran.dg/no-automatic.f90: New test.
From-SVN: r268098
Diffstat (limited to 'gcc/fortran/resolve.c')
-rw-r--r-- | gcc/fortran/resolve.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 3f893f1..2c49aea 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -16673,7 +16673,7 @@ resolve_types (gfc_namespace *ns) gfc_traverse_ns (ns, resolve_values); - if (ns->save_all) + if (ns->save_all || !flag_automatic) gfc_save_all (ns); iter_stack = NULL; |