[Bug fortran/93814] [11/12/13/14/15 Regression] ICE in build_entry_thunks, at fortran/trans-decl.c:2898

[dcb314 at hotmail dot com via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93814

--- Comment #12 from David Binderman <dcb314 at hotmail dot com> ---
Bit more detail:

./Lower/HLFIR/bindc-entry-stmt.f90:5:0:

    5 | function foo() bind(c)
Warning: Variable ‘foo’ at (1) may not be a C interoperable kind but it is
BIND(C) [-Wc-binding-type]
./Lower/HLFIR/bindc-entry-stmt.f90:39:28:

   39 |   character(1) :: foo2, bar2
      |                            1
Warning: Variable ‘bar2’ at (1) may not be a C interoperable kind but it is
BIND(C) [-Wc-binding-type]
==1442522== Invalid read of size 8
==1442522==    at 0x862E5E: quick_push (vec.h:1043)
==1442522==    by 0x862E5E: vec_safe_push<tree_node*, va_gc> (vec.h:835)
==1442522==    by 0x862E5E: build_entry_thunks (trans-decl.cc:3002)
==1442522==    by 0x862E5E: gfc_create_function_decl(gfc_namespace*, bool)
(trans-decl.cc:3157)