This code shows that the definitions for omp_integer_kind and omp_logical_kind
are missing from the omp_lib.h include file. If the module is used instead,
there is no error.
! derived from OpenMP test omp3f/F03_3_2_11_1a.f90
program F03_3_2_11_1a
! use omp_lib
implicit none
include 'omp_lib.h'
! check that some kind variables are around
print *, 'omp_integer_kind = ', omp_integer_kind
print *, 'omp_logical_kind = ', omp_logical_kind
print *, 'omp_sched_kind = ', omp_sched_kind
end program F03_3_2_11_1a
> ftn -fopenmp test.f90
test.f90:8.53:
print *, 'omp_integer_kind = ', omp_integer_kind
1
Error: Symbol 'omp_integer_kind' at (1) has no IMPLICIT type
test.f90:9.53:
print *, 'omp_logical_kind = ', omp_logical_kind
1
Error: Symbol 'omp_logical_kind' at (1) has no IMPLICIT type
>
Note from the OpenMP tester:
Output for the modified program using the module omp_lib:
> ./x
omp_integer_kind = 4
omp_logical_kind = 4
omp_sched_kind = 4
NOTE:
Section D.2 is missing the following statements found in
Section D.3 p.306 lines 7 & 8:
integer, parameter :: omp_integer_kind = 4
integer, parameter :: omp_logical_kind = 4
--
Summary: Missing defs in omp_lib.h
Product: gcc
Version: 4.4.2
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: longb at cray dot com
GCC build triplet: x86_64-suse-linux
GCC host triplet: x86_64-suse-linux
GCC target triplet: x86_64-suse-linux
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=42041
