https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89751
Dominique d'Humieres <dominiq at lps dot ens.fr> changed:
What |Removed |Added
----------------------------------------------------------------------------
Priority|P3 |P4
Status|UNCONFIRMED |NEW
Last reconfirmed| |2019-03-18
CC| |janus at gcc dot gnu.org,
| |pault at gcc dot gnu.org
Ever confirmed|0 |1
--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
The test compiles with the following patch
--- ../_clean/gcc/fortran/resolve.c 2019-03-18 09:41:55.000000000 +0100
+++ gcc/fortran/resolve.c 2019-03-18 11:37:56.000000000 +0100
@@ -13973,7 +13976,7 @@ resolve_component (gfc_component *c, gfc
}
/* Procedure pointer components: Check PASS arg. */
- if (c->attr.proc_pointer && !c->tb->nopass && c->tb->pass_arg_num == 0
+ if (c->attr.proc_pointer && c->tb && !c->tb->nopass && c->tb->pass_arg_num
== 0
&& !sym->attr.vtype)
{
gfc_symbol* me_arg;
However I have no idea if the test is valid or not.
> This testcase was reduced from the same original file as the one filed in
> PR89601.
This has been fixed on trunk at revision r269658.
