Hi Thomas,

On 11/12/19 1:42 PM, Thomas König wrote:
Ah, of course. I should have said module procedures. Or even module procedures 
without bind(C)?
It would probably be the latter. The change would actually be rather small: If 
conditions are met, just add attr.value for INTENT(IN). This is something we 
should probably do when we are forced into doing an ABI change by other 
circumstances.

Will this still work if one does:

module m
contains
integer function val(y)
  integer, intent(in) :: y
  val = 2*y
end function val
end module m

use m
interface
  integer function proc(z)
    integer, intent(in) :: z
  end function proc
end interface
procedure(proc), pointer :: ff
ff => val
print *, ff(10)
end

Tobias

Reply via email to