omp_set_lock (3f)

makes the executing thread wait until the specified lock is available

Syntax

  interface
     subroutine omp_set_lock ( var )
     integer ( kind=8 ) var
     end subroutine omp_set_lock
  end interface
  integer ( kind=8 ) v
  call omp_set_lock ( v )

Description

  When the lock becomes available, the thread is granted ownership.

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_test_lock(3f),
  omp_unset_lock(3f)