Returns an unsigned long value for a specified user address.
Availability Library (liblapi_r.a)
#include <lapi.h>
int LAPI_Address(my_addr, ret_addr)
void *my_addr;
ulong *ret_addr;
Note: This
subroutine is meant to be used by FORTRAN programs. The C version
of LAPI_Address is provided for compatibility
purposes only.include 'lapif.h'
LAPI_ADDRESS(my_addr, ret_addr, ierror)
INTEGER (KIND=any_type) :: my_addr
INTEGER (KIND=LAPI_ADDR_TYPE) :: ret_addr
INTEGER ierror
where:
Type of call: local address manipulation
Use this subroutine in FORTRAN programs when you need to store specified addresses in an array. In FORTRAN, the concept of address (&) does not exist as it does in C. LAPI_Address provides FORTRAN programmers with this function.
! Contains the address of the target counter
integer (KIND=LAPI_ADDR_TYPE) :: cntr_addr
! Target Counter
type (LAPI_CNTR_T) :: tgt_cntr
! Return code
integer :: ierror
call LAPI_ADDRESS(tgt_cntr, cntr_addr, ierror)
! cntr_addr now contains the address of tgt_cntr