It is illegal to call this routine with a lock variable that is not initialized.
For Fortran, var must be an integer large enough to hold an address, such as INTEGER*8 on 64-bit systems.
Lawrence Livermore National Laboratory
7000 East Avenue • Livermore, CA 94550 | LLNL-WEB-458451
Operated by the Lawrence Livermore National Security, LLC for the
Department of Energy's National Nuclear Security Administration
Learn about the Department of Energy's Vulnerability Disclosure Program