Hello,

For PR 63727, a check was introduced, rejecting procedure pointer
components used as actual arguments:
	foo(obj%proc_comp)
but it had the side effect of also rejecting
	foo(obj%proc_comp(arg))

Fixed by the attached patch.
Tested on x86_64-linux. OK for 6/5 ?

Mikael