OSDN Git Service

2008-06-12 Tobias Burnus <burnus@net-b.de>
authorburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 12 Jun 2008 12:15:29 +0000 (12:15 +0000)
committerburnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 12 Jun 2008 12:15:29 +0000 (12:15 +0000)
        * omp_lib.f90.in: Add "implicit none".

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

libgomp/ChangeLog
libgomp/omp_lib.f90.in

index ff9ed03..1e81a55 100644 (file)
@@ -1,3 +1,7 @@
+2008-06-12  Tobias Burnus  <burnus@net-b.de>
+
+       * omp_lib.f90.in: Add "implicit none".
+
 2008-06-12  Jakub Jelinek  <jakub@redhat.com>
 
        PR middle-end/36506
index c61b93f..07a5799 100644 (file)
@@ -26,6 +26,7 @@
 !  General Public License.
 
       module omp_lib_kinds
+        implicit none
         integer, parameter :: omp_integer_kind = 4
         integer, parameter :: omp_logical_kind = 4
         integer, parameter :: omp_lock_kind = @OMP_LOCK_KIND@
@@ -35,6 +36,7 @@
 
       module omp_lib
         use omp_lib_kinds
+        implicit none
         integer, parameter :: openmp_version = 200805
         integer (omp_sched_kind), parameter :: omp_sched_static = 1
         integer (omp_sched_kind), parameter :: omp_sched_dynamic = 2