diff options
| author | Janus Weil <janus@gcc.gnu.org> | 2011-10-07 16:40:14 +0200 |
|---|---|---|
| committer | Janus Weil <janus@gcc.gnu.org> | 2011-10-07 16:40:14 +0200 |
| commit | 58eba515913ec98edcf090389599ae25f4704ea1 (patch) | |
| tree | b58b5a3ae62500a26783062c14befc760498b995 /gcc/fortran/class.c | |
| parent | 14307a72de032f77c30f44486d570892268c5026 (diff) | |
| download | gcc-58eba515913ec98edcf090389599ae25f4704ea1.zip gcc-58eba515913ec98edcf090389599ae25f4704ea1.tar.gz gcc-58eba515913ec98edcf090389599ae25f4704ea1.tar.bz2 | |
re PR fortran/50625 ([OOP] ALLOCATABLE attribute lost for module CLASS variables)
2011-10-07 Janus Weil <janus@gcc.gnu.org>
PR fortran/50625
* class.c (gfc_build_class_symbol): Fix whitespace.
* module.c (mio_symbol): Set 'class_ok' attribute.
* trans-decl.c (gfc_get_symbol_decl): Make sure the backend_decl has
been built for class symbols.
2011-10-07 Janus Weil <janus@gcc.gnu.org>
PR fortran/50625
* gfortran.dg/class_46.f03: New.
From-SVN: r179660
Diffstat (limited to 'gcc/fortran/class.c')
| -rw-r--r-- | gcc/fortran/class.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/class.c b/gcc/fortran/class.c index 572011f..f64cc1b 100644 --- a/gcc/fortran/class.c +++ b/gcc/fortran/class.c @@ -188,7 +188,7 @@ gfc_build_class_symbol (gfc_typespec *ts, symbol_attribute *attr, /* Class container has already been built. */ return SUCCESS; - attr->class_ok = attr->dummy || attr->pointer || attr->allocatable; + attr->class_ok = attr->dummy || attr->pointer || attr->allocatable; if (!attr->class_ok) /* We can not build the class container yet. */ |