From 87350d4af5ff329ab694092f0edf91969ef0e2c9 Mon Sep 17 00:00:00 2001 From: Tobias Burnus Date: Thu, 23 Sep 2010 11:01:32 +0200 Subject: intrinsic.texi (OpenMP modules): Add named constants of OMP_LIB. gcc/fortran/ 2010-09-23 Tobias Burnus * intrinsic.texi (OpenMP modules): Add named constants of OMP_LIB. libgomp/ 2010-09-23 Tobias Burnus * libgomp.texi (omp_get_nested, omp_set_nested, * omp_set_dynamic): Change Fortran datatype to LOGICAL. (omp_set_lock, omp_test_lock, omp_unset_lock, omp_set_nested_lock, omp_unset_nested_lock): Use intent(inout) instead of intent(out). From-SVN: r164551 --- libgomp/ChangeLog | 7 +++++++ libgomp/libgomp.texi | 16 ++++++++-------- 2 files changed, 15 insertions(+), 8 deletions(-) (limited to 'libgomp') diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog index 7079bae..7de7df6 100644 --- a/libgomp/ChangeLog +++ b/libgomp/ChangeLog @@ -1,3 +1,10 @@ +2010-09-23 Tobias Burnus + + * libgomp.texi (omp_get_nested, omp_set_nested, omp_set_dynamic): + Change Fortran datatype to LOGICAL. + (omp_set_lock, omp_test_lock, omp_unset_lock, omp_set_nested_lock, + omp_unset_nested_lock): Use intent(inout) instead of intent(out). + 2010-08-21 Ralf Wildenhues * configure: Regenerate. diff --git a/libgomp/libgomp.texi b/libgomp/libgomp.texi index 20ffd67..b88e984 100644 --- a/libgomp/libgomp.texi +++ b/libgomp/libgomp.texi @@ -362,7 +362,7 @@ disabled by default. @item @emph{Fortran}: @multitable @columnfractions .20 .80 -@item @emph{Interface}: @tab @code{integer function omp_get_nested()} +@item @emph{Interface}: @tab @code{logical function omp_get_nested()} @end multitable @item @emph{See also}: @@ -583,7 +583,7 @@ adjustment of team sizes and @code{false} disables it. @item @emph{Fortran}: @multitable @columnfractions .20 .80 @item @emph{Interface}: @tab @code{subroutine omp_set_dynamic(set)} -@item @tab @code{integer, intent(in) :: set} +@item @tab @code{logical, intent(in) :: set} @end multitable @item @emph{See also}: @@ -639,7 +639,7 @@ dynamic adjustment of team sizes and @code{false} disables it. @item @emph{Fortran}: @multitable @columnfractions .20 .80 @item @emph{Interface}: @tab @code{subroutine omp_set_nested(set)} -@item @tab @code{integer, intent(in) :: set} +@item @tab @code{logical, intent(in) :: set} @end multitable @item @emph{See also}: @@ -756,7 +756,7 @@ a deadlock occurs. @item @emph{Fortran}: @multitable @columnfractions .20 .80 @item @emph{Interface}: @tab @code{subroutine omp_set_lock(lock)} -@item @tab @code{integer(omp_lock_kind), intent(out) :: lock} +@item @tab @code{integer(omp_lock_kind), intent(inout) :: lock} @end multitable @item @emph{See also}: @@ -787,7 +787,7 @@ does not block if the lock is not available. This function returns @multitable @columnfractions .20 .80 @item @emph{Interface}: @tab @code{subroutine omp_test_lock(lock)} @item @tab @code{logical(omp_logical_kind) :: omp_test_lock} -@item @tab @code{integer(omp_lock_kind), intent(out) :: lock} +@item @tab @code{integer(omp_lock_kind), intent(inout) :: lock} @end multitable @item @emph{See also}: @@ -817,7 +817,7 @@ again, set the lock for itself. @item @emph{Fortran}: @multitable @columnfractions .20 .80 @item @emph{Interface}: @tab @code{subroutine omp_unset_lock(lock)} -@item @tab @code{integer(omp_lock_kind), intent(out) :: lock} +@item @tab @code{integer(omp_lock_kind), intent(inout) :: lock} @end multitable @item @emph{See also}: @@ -899,7 +899,7 @@ nesting count for the lock in incremented. @item @emph{Fortran}: @multitable @columnfractions .20 .80 @item @emph{Interface}: @tab @code{subroutine omp_set_nest_lock(lock)} -@item @tab @code{integer(omp_nest_lock_kind), intent(out) :: lock} +@item @tab @code{integer(omp_nest_lock_kind), intent(inout) :: lock} @end multitable @item @emph{See also}: @@ -961,7 +961,7 @@ one of them is chosen to, again, set the lock for itself. @item @emph{Fortran}: @multitable @columnfractions .20 .80 @item @emph{Interface}: @tab @code{subroutine omp_unset_nest_lock(lock)} -@item @tab @code{integer(omp_nest_lock_kind), intent(out) :: lock} +@item @tab @code{integer(omp_nest_lock_kind), intent(inout) :: lock} @end multitable @item @emph{See also}: -- cgit v1.1