This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [gomp] Fix omp_test_nest_lock () in C/C++/Fortran and omp_test_lock () in Fortran
- From: Richard Henderson <rth at redhat dot com>
- To: Jakub Jelinek <jakub at redhat dot com>
- Cc: Diego Novillo <dnovillo at redhat dot com>, gcc-patches at gcc dot gnu dot org
- Date: Fri, 18 Nov 2005 11:49:27 -0800
- Subject: Re: [gomp] Fix omp_test_nest_lock () in C/C++/Fortran and omp_test_lock () in Fortran
- References: <20051118163356.GC31785@devserv.devel.redhat.com>
On Fri, Nov 18, 2005 at 11:33:56AM -0500, Jakub Jelinek wrote:
> * config/posix/omp-lock.h (omp_nest_lock_t): Change into struct,
> add integer count field.
> * config/posix/lock.c (omp_destroy_nest_lock): Adjust for
> omp_nest_lock_t type change.
> (omp_init_nest_lock): Likewise. Initialize count to 0.
> (omp_set_nest_lock): Adjust for omp_nest_lock_t type change.
> Increment count.
> (omp_unset_nest_lock): Adjust for omp_nest_lock_t type change.
> Decrement count.
> (omp_test_nest_lock): Adjust for omp_nest_lock_t type change.
> Increment count if successful and return the new nesting level.
> * config/linux/lock.c (omp_test_nest_lock): Return new nesting level.
> * omp_lib.f90.in (omp_test_lock): Fix LOCK argument type.
> * testsuite/libgomp.c/lib-1.c: New test.
> * testsuite/libgomp.fortran/lib1.f90: New test.
> * testsuite/libgomp.fortran/lib2.f: New test.
> * testsuite/libgomp.fortran/lib3.f: New test.
Ok.
> +int omp_test_nest_lock (omp_nest_lock_t *lock)
Newline.
r~