From: Jakub Jelinek <jakub@redhat.com>
Date: Wed, 11 Jun 2008 07:06:14 +0000 (+0200)
Subject: re PR libgomp/36471 (omp_get_ancestor_thread_num_8 has no implicit type.)
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=01501fc82cfc15d61e577b88295734f684e939c9;p=gcc.git

re PR libgomp/36471 (omp_get_ancestor_thread_num_8 has no implicit type.)

	PR libgomp/36471
	* omp_lib.f90.in (omp_get_ancestor_thread_num_8,
	omp_get_team_size_8): Fix pastos.

From-SVN: r136654
---

diff --git a/libgomp/ChangeLog b/libgomp/ChangeLog
index ca5d3c0dce5..5a1cac157be 100644
--- 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 a31a94567ea..c61b93f8145 100644
--- 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