[Bug fortran/82550] program using submodules fails to link

[pault at gcc dot gnu.org]

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

--- Comment #2 from Paul Thomas <pault at gcc dot gnu.org> ---
(In reply to Dominique d'Humieres from comment #1)
> Confirmed from 6.4 up to trunk (8.0).

Adding a reference to 'p' in 'foo' clears the problem.

    module subroutine foo(fun_ptr)
      procedure(p), pointer, intent(out) :: fun_ptr
       call p()
      fun_ptr => p
    end subroutine

I rather think that the pointer assignment is not setting 'p' as referenced.

Investigating.....

Paul