Next: _gfortran_caf_unlock, Previous: _gfortran_caf_sendget_by_ref, Up: Function ABI Documentation
_gfortran_caf_lock
— Locking a lock variableNULL
, the function returns after having obtained the lock. If it is
non-NULL
, then acquired_lock is assigned the value true (one) when
the lock could be obtained and false (zero) otherwise. Locking a lock variable
which has already been locked by the same image is an error.
void _gfortran_caf_lock (caf_token_t token, size_t index, int image_index,
int *acquired_lock, int *stat, char *errmsg, size_t errmsg_len)
token | intent(in) An opaque pointer identifying the coarray.
|
index | intent(in) Array index; first array index is 0. For
scalars, it is always 0.
|
image_index | intent(in) The ID of the remote image; must be a
positive number.
|
acquired_lock | intent(out) If not NULL, it returns whether lock
could be obtained.
|
stat | intent(out) Stores the STAT=; may be NULL.
|
errmsg | intent(out) When an error occurs, this will be set to
an error message; may be NULL.
|
errmsg_len | intent(in) the buffer size of errmsg
|