9.55. C_FUNLOC

9.55 C_FUNLOC — Obtain the C address of a procedure

Description:

C_FUNLOC(x) determines the C address of the argument.

Standard:

Fortran 2003 and later

Class:

Inquiry function

Syntax:

RESULT = C_FUNLOC(x)

Arguments:

x	Interoperable function or pointer to such function.

Return value:

The return value is of type C_FUNPTR and contains the C address of the argument.

Example:

module x
  use iso_c_binding
  implicit none
contains
  subroutine sub(a) bind(c)
    real(c_float) :: a
    a = sqrt(a)+
登录查看完整内容