diff options
| author | Martin Liska <mliska@suse.cz> | 2021-06-29 08:49:26 +0200 |
|---|---|---|
| committer | Martin Liska <mliska@suse.cz> | 2021-06-29 08:49:26 +0200 |
| commit | 490d1e1be15b62b51a2de248e6d7f76356402bc9 (patch) | |
| tree | a140872a97abd647ca0e5287e5375b7514be227b /gcc/fortran/trans-array.c | |
| parent | adf0825ae77554b00615521a545b608892bb272c (diff) | |
| parent | 095a01cf6e3883b3083cf339b680cdb39910f529 (diff) | |
| download | gcc-490d1e1be15b62b51a2de248e6d7f76356402bc9.zip gcc-490d1e1be15b62b51a2de248e6d7f76356402bc9.tar.gz gcc-490d1e1be15b62b51a2de248e6d7f76356402bc9.tar.bz2 | |
Merge branch 'master' into devel/sphinx
Diffstat (limited to 'gcc/fortran/trans-array.c')
| -rw-r--r-- | gcc/fortran/trans-array.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c index a6bcd2b..0d013de 100644 --- a/gcc/fortran/trans-array.c +++ b/gcc/fortran/trans-array.c @@ -2764,7 +2764,7 @@ trans_array_constructor (gfc_ss * ss, locus * where) desc = ss_info->data.array.descriptor; offset = gfc_index_zero_node; offsetvar = gfc_create_var_np (gfc_array_index_type, "offset"); - TREE_NO_WARNING (offsetvar) = 1; + suppress_warning (offsetvar); TREE_USED (offsetvar) = 0; gfc_trans_array_constructor_value (&outer_loop->pre, type, desc, c, &offset, &offsetvar, dynamic); |