mirror of git://gcc.gnu.org/git/gcc.git
Correction régression class_40.f90
This commit is contained in:
parent
81df5b1d86
commit
9aa7ec58f8
|
@ -1841,7 +1841,6 @@ generate_finalization_wrapper (gfc_symbol *derived, gfc_namespace *ns,
|
|||
array->ts.u.derived = derived;
|
||||
array->attr.flavor = FL_VARIABLE;
|
||||
array->attr.dummy = 1;
|
||||
array->attr.contiguous = 1;
|
||||
array->attr.dimension = 1;
|
||||
array->attr.artificial = 1;
|
||||
array->as = gfc_get_array_spec();
|
||||
|
|
Loading…
Reference in New Issue