Fixes are available
APAR status
Closed as program error.
Error description
The following error occurs in test.f90 file when compiling with xlf: ---------------------------------------------------------------- "test.f90", line 31.5: 1513-119 (S) Identifier array appeared in a USE statement but is not publicly accessible from this module. "test.f90", line 32.16: 1514-084 (S) Identifier tt is being declared with type name array which has not been defined in a derived type definition. ** test_types === End of Compilation 4 === 1501-511 Compilation failed for file test.f90. ---------------------------------------------------------------- =======TESTCASE========= -------test.f90--------- module ArrayMod type Array integer::i end type end module module AttributeMod use ArrayMod private type Attribute integer::j type(Array) :: AttrArray end type public Attribute end module module ESMF_Mod use AttributeMod use ArrayMod end module program test_types use ESMF_Mod, only: Array type(array) :: tt end program -------end of test.f90-------
Local fix
N/A
Problem summary
USER AFFECTED: Users who specify USE ONLY to read in a type definition in a module indirectly through multiple levels of use association, where the type definition is guarded with the private attribute in one of the levels of use association, but ultimately is brought in as a public entity. PROBLEM DESCRIPTION: Compiler complains that an identifier is being declared with a type that is not publicly accessible.
Problem conclusion
Fixed the frontend bug by marking the private/public attributes of the type definition being read properly.
Temporary fix
Comments
APAR Information
APAR number
LI75476
Reported component name
XL FORTRAN SLES
Reported component ID
5724U8400
Reported release
C10
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2010-04-27
Closed date
2010-04-27
Last modified date
2010-04-27
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
Fix information
Fixed component name
XL FORTRAN SLES
Fixed component ID
5724U8400
Applicable component levels
RC10 PSN IZ65902
UP06/09/13
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSB259","label":"XL Fortran Advanced Edition for Linux"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"C.1","Line of Business":{"code":"LOB57","label":"Power"}}]
Document Information
Modified date:
24 February 2022