[Bug fortran/124652] passing a procedure pointer to c_funloc gives incorrect result

[anlauf at gcc dot gnu.org]

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

--- Comment #3 from anlauf at gcc dot gnu.org ---
Created attachment 64086
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=64086&action=edit
Extended testcase

This extended testcase shows what fails and what does not - and it ICEs
with 16-trunk for me.