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.

Reply via email to