diff options
author | Janus Weil <janus@gcc.gnu.org> | 2011-03-29 11:39:10 +0200 |
---|---|---|
committer | Janus Weil <janus@gcc.gnu.org> | 2011-03-29 11:39:10 +0200 |
commit | d91909c0133554d00379f0ef41fe2d2ff6ab9968 (patch) | |
tree | 5cbc71797224538781afa1e8370fcb01a020856b /gcc/fortran/module.c | |
parent | 23360fe40929b6f731db12007a7b262e72e5e336 (diff) | |
download | gcc-d91909c0133554d00379f0ef41fe2d2ff6ab9968.zip gcc-d91909c0133554d00379f0ef41fe2d2ff6ab9968.tar.gz gcc-d91909c0133554d00379f0ef41fe2d2ff6ab9968.tar.bz2 |
re PR fortran/48095 ([OOP] Invalid assignment to procedure pointer component not rejected)
2011-03-29 Janus Weil <janus@gcc.gnu.org>
PR fortran/48095
* decl.c (match_procedure_decl,match_ppc_decl): Set flavor of interface.
* module.c (MOD_VERSION): Bump.
(mio_typespec): Read/write 'interface' field.
* primary.c (match_string_constant,match_logical_constant): Remove
unneeded code.
(match_complex_constant): Make sure to clear the typespec.
2011-03-29 Janus Weil <janus@gcc.gnu.org>
PR fortran/48095
* gfortran.dg/module_md5_1.f90: Modified MD5 sum.
* gfortran.dg/proc_ptr_comp_32.f90: New.
From-SVN: r171654
Diffstat (limited to 'gcc/fortran/module.c')
-rw-r--r-- | gcc/fortran/module.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 923f8c6..36701b4 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -80,7 +80,7 @@ along with GCC; see the file COPYING3. If not see /* Don't put any single quote (') in MOD_VERSION, if yout want it to be recognized. */ -#define MOD_VERSION "6" +#define MOD_VERSION "7" /* Structure that describes a position within a module file. */ @@ -2124,6 +2124,8 @@ mio_typespec (gfc_typespec *ts) else mio_symbol_ref (&ts->u.derived); + mio_symbol_ref (&ts->interface); + /* Add info for C interop and is_iso_c. */ mio_integer (&ts->is_c_interop); mio_integer (&ts->is_iso_c); |