Compaq Fortran for Tru64 UNIX Alpha Systems V5.4
omp_test_lock (3f)
tries to set the lock associated with a given lock variable
Syntax
interface
logical function omp_test_lock ( var )
integer ( kind=8 ) var
end function omp_test_lock
end interface
integer ( kind=8 ) v
logical result
result = omp_test_lock ( v )
Return Values
If attempts to set the lock specified by the variable succeed, the function
returns TRUE; otherwise, the function returns FALSE.
Restrictions
Attempting to call this routine with a lock variable that has not been
initialized is an invalid operation and will cause a run-time error.
See Also
omp_destroy_lock(3f), omp_init_lock(3f), omp_set_lock(3f),
omp_unset_lock(3f)