diff options
| author | Paul Thomas <pault@gcc.gnu.org> | 2008-08-08 23:22:51 +0000 |
|---|---|---|
| committer | Paul Thomas <pault@gcc.gnu.org> | 2008-08-08 23:22:51 +0000 |
| commit | 63a3341a9d1f760b1761b365f57a27523bfb548b (patch) | |
| tree | 86bf411a254c10887ecbc94dc8b2b49fdd4b8a9a /gcc/fortran/gfortran.h | |
| parent | e73f7547c50e91654c691a620a949085645c4e51 (diff) | |
| download | gcc-63a3341a9d1f760b1761b365f57a27523bfb548b.zip gcc-63a3341a9d1f760b1761b365f57a27523bfb548b.tar.gz gcc-63a3341a9d1f760b1761b365f57a27523bfb548b.tar.bz2 | |
re PR fortran/37011 (F2003, type extension: multiple inheritence not rejected)
2008-08-09 Paul Thomas <pault@gcc.gnu.org>
PR fortran/37011
* symbol.c (gfc_add_extension): New function.
* decl.c (gfc_get_type_attr_spec): Call it.
(gfc_match_derived_decl): Set symbol extension attribute from
attr.extension.
* gfortran.h : Add prototype for gfc_add_extension.
From-SVN: r138891
Diffstat (limited to 'gcc/fortran/gfortran.h')
| -rw-r--r-- | gcc/fortran/gfortran.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h index e315cde..ccd2c03 100644 --- a/gcc/fortran/gfortran.h +++ b/gcc/fortran/gfortran.h @@ -2170,7 +2170,8 @@ gfc_try gfc_add_volatile (symbol_attribute *, const char *, locus *); gfc_try gfc_add_proc (symbol_attribute *attr, const char *name, locus *where); gfc_try gfc_add_access (symbol_attribute *, gfc_access, const char *, locus *); -gfc_try gfc_add_is_bind_c(symbol_attribute *, const char *, locus *, int); +gfc_try gfc_add_is_bind_c (symbol_attribute *, const char *, locus *, int); +gfc_try gfc_add_extension (symbol_attribute *, locus *); gfc_try gfc_add_value (symbol_attribute *, const char *, locus *); gfc_try gfc_add_flavor (symbol_attribute *, sym_flavor, const char *, locus *); gfc_try gfc_add_entry (symbol_attribute *, const char *, locus *); |