Fortran Wiki
c_associated (Rev #2, changes)

Showing changes from revision #1 to #2: (追記) Added (追記ここまで) | ~~(削除) Removed (削除ここまで)~~ | ~~(削除) Chan (削除ここまで)~~(追記) ged (追記ここまで)

Description

c_associated(c_prt_1[, c_ptr_2]) determines the status of the C pointer c_ptr_1 or if c_ptr_1 is associated with the target c_ptr_2.

Standard

~~(削除) Fortran 2003 and later (削除ここまで)~~(追記) Fortran 2003 (追記ここまで)(追記) and later (追記ここまで)

Class

Inquiry function

Syntax

result = c_associated(c_prt_1[, c_ptr_2])

Arguments

c_ptr_1 - Scalar of the type c_ptr or c_funptr.
c_ptr_2 - (Optional) Scalar of the same type as c_ptr_1.

Return value

The return value is of type logical; it is .false. if either c_ptr_1 is a C~~(削除) NULL (削除ここまで)(削除) pointer (削除ここまで)(削除) or (削除ここまで)(削除) if (削除ここまで)~~(追記) NULL (追記ここまで)(追記) pointer or if (追記ここまで)c_ptr1 and c_ptr_2 point to different addresses.

Example

subroutine association_test(a,b)
 use iso_c_binding, only: c_associated, c_loc, c_ptr
 implicit none
 real, pointer :: a
 type(c_ptr) :: b
 if(c_associated(b, c_loc(a))) &
 stop 'b and a do not point to same target'
end subroutine association_test

Fortran Wiki c_associated (Rev #2, changes)