PR libgomp/36471

	* omp_lib.f90.in (omp_get_ancestor_thread_num_8,
	omp_get_team_size_8): Fix pastos.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@136654 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog
index ca5d3c0..5a1cac1 100644 (file)
--- a/libgomp/ChangeLog
+++ b/libgomp/ChangeLog
@@ -1,5 +1,9 @@
 2008-06-11  Jakub Jelinek  <jakub@redhat.com>
 
+       PR libgomp/36471
+       * omp_lib.f90.in (omp_get_ancestor_thread_num_8,
+       omp_get_team_size_8): Fix pastos.
+
        PR libgomp/36469
        * configure.ac: Add AC_CHECK_FUNCS (strtoull).
        * configure: Regenerated.

diff --git a/libgomp/omp_lib.f90.in b/libgomp/omp_lib.f90.in
index a31a945..c61b93f 100644 (file)
--- a/libgomp/omp_lib.f90.in
+++ b/libgomp/omp_lib.f90.in
@@ -268,7 +268,7 @@
           function omp_get_ancestor_thread_num_8 (level)
             use omp_lib_kinds
             integer (8), intent (in) :: level
-            integer (omp_integer_kind) :: omp_get_ancestor_thread_num
+            integer (omp_integer_kind) :: omp_get_ancestor_thread_num_8
           end function omp_get_ancestor_thread_num_8
         end interface
 
@@ -281,7 +281,7 @@
           function omp_get_team_size_8 (level)
             use omp_lib_kinds
             integer (8), intent (in) :: level
-            integer (omp_integer_kind) :: omp_get_team_size
+            integer (omp_integer_kind) :: omp_get_team_size_8
           end function omp_get_team_size_8
         end interface