Fortran Wiki
c_loc (Rev #2, changes)

Skip the Navigation Links | Home Page | All Pages | Recently Revised | Authors | Feeds | Export |

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

Description

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

Standard

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

Class

Inquiry function

Syntax

result = c_loc(x)

Arguments

• x - Associated scalar pointer or interoperable scalar or allocated allocatable variable with target attribute.

Return value

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

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

See also

c_associated, c_funloc, c_f_pointer, c_f_procpointer (追記) , (追記ここまで)(追記) iso_c_binding (追記ここまで)

Revision from April 29, 2009 11:10:26 by Jason Blevins

Forward in time (2 more) | Back in time (1 more) | See current | Hide changes | History | Rollback | View: Source | Linked from: Intrinsic procedures, c_associated, c_f_pointer, c_f_procpointer, c_funloc, C interoperability, iso_c_binding