Fortran 2003 标准提供了一种引用 C 语言过程的方式。ISO_C_BINDING 模块按内模块函数形式定义了三个支持过程。访问这些函数需要在调用例程中使用
USE, INTRINSIC :: ISO_C_BINDING, ONLY: C_LOC, C_PTR, C_ASSOCIATED
。该模块中定义的过程如下
功能 |
说明 |
---|---|
C_LOC(X) |
返回参数的 C 地址 |
C_ASSOCIATED(C_PTR_1 [, C_PTR_2]) |
表示 C_PTR_1 的关联状态,或者表示 C_PTR_1 和 C_PTR_2 是否与同一个实体关联。 |
C_F_POINTER(CPTR, FPTR [, SHAPE]) |
将指针与 C 指针的目标关联并指定其形式。 |
有关 ISO_C_BINDING 内模块的详细信息,请参见 http://www.j3-fortran.org 上的 Fortran 2003 标准的第 15 章。