Searched refs:NEW_LOCK (Results 1 - 1 of 1) sorted by relevance

/netbsd-6-1-5-RELEASE/external/gpl3/gcc/dist/libgomp/testsuite/libgomp.fortran/appendix-a/
H A Da.33.3.f903 FUNCTION NEW_LOCK() function
5 INTEGER(OMP_LOCK_KIND), POINTER :: NEW_LOCK local in function:NEW_LOCK
7 ALLOCATE(NEW_LOCK)
8 CALL OMP_INIT_LOCK(NEW_LOCK)
9 !$OMP END SINGLE COPYPRIVATE(NEW_LOCK)
10 END FUNCTION NEW_LOCK

Completed in 152 milliseconds