https://gcc.gnu.org/bugzilla/show_bug.cgi?id=121480
kargls at comcast dot net changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |kargls at comcast dot net
--- Comment #1 from kargls at comcast dot net ---
The backtrace shows that gfortran is hitting an assert()
19 | test_harness%test_fixture_ = [test_fixture_t(foo_test_t())]
| 1
internal compiler error: in gfc_get_symbol_decl, at fortran/trans-decl.cc:1644
0x26b192a internal_error(char const*, ...)
../../gcc/gcc/diagnostic-global-context.cc:534
0x9c1880 fancy_abort(char const*, int, char const*)
../../gcc/gcc/diagnostics/context.cc:1640
0x76094c gfc_get_symbol_decl(gfc_symbol*)
../../gcc/gcc/fortran/trans-decl.cc:1644
at 1644. If I comment out the assert(),
gcc_assert (sym->attr.referenced
|| sym->attr.flavor == FL_PROCEDURE
|| sym->attr.use_assoc
|| sym->attr.used_in_submodule
|| sym->ns->proc_name->attr.if_source == IFSRC_IFBODY
|| (sym->module && sym->attr.if_source != IFSRC_DECL
&& sym->backend_decl));
the code compiles.
