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

[anlauf at gcc dot gnu.org via Gcc-bugs]

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

--- Comment #2 from anlauf at gcc dot gnu.org ---
Workaround: replace in subroutine round_trip_conversion

    procedure(compute_interface), pointer, intent(in)  :: fptr_in

by

    procedure(compute_interface)                       :: fptr_in