------- Comment #1 from burnus at gcc dot gnu dot org 2010-06-07 15:58 -------
Untested:
--- a/gcc/fortran/symbol.c
+++ b/gcc/fortran/symbol.c
@@ -567,8 +567,9 @@ check_conflict (symbol_attribute *attr, const char *name,
locus *where)
}
conf (is_protected, intrinsic)
- conf (is_protected, external)
conf (is_protected, in_common)
+ if (!attr->proc_pointer)
+ conf (is_protected, external)
conf (asynchronous, intrinsic)
conf (asynchronous, external)
--
burnus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Keywords| |rejects-valid
Last reconfirmed|0000-00-00 00:00:00 |2010-06-07 15:58:33
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44446
