Fixes are available
April 2012 PTF for XL Fortran for AIX, V13.1
July 2012 PTF for XL Fortran for AIX, V13.1
October 2012 PTF for XL Fortran for AIX, V13.1
February 2013 PTF for XL Fortran for AIX, V13.1
May 2013 PTF for XL Fortran for AIX, V13.1
XL Fortran for AIX Fix Pack 15 (August 2013 PTF) for 13.1
XL Fortran for AIX Fix Pack 16 (November 2013 PTF) for 13.1
XL Fortran for AIX Fix Pack 17 (February 2014 PTF) for 13.1
XL Fortran for AIX Fix Pack 21 (April 2015 PTF) for 13.1
XL Fortran for AIX Fix Pack 22 (September 2015 PTF) for 13.1
XL Fortran for AIX Fix Pack 23 (March 2016 PTF) for 13.1
XL Fortran for AIX Fix Pack 24 (September 2016 PTF) for 13.1
APAR status
Closed as program error.
Error description
The compiler produces an internal compiler error when compiling the following test case: $cat test.f90 MODULE marker_class IMPLICIT NONE TYPE :: collision_type INTEGER :: markerNumber2 TYPE( collision_type ), POINTER :: previous => NULL() END TYPE Collision_type TYPE :: slave_type REAL, DIMENSION(:,:,:,:), ALLOCATABLE :: vel TYPE( collision_type ), POINTER :: collision => NULL() END TYPE slave_type TYPE :: marker_type TYPE( slave_type ), POINTER :: slave => NULL() TYPE( collision_type ), POINTER :: collision => NULL() END TYPE marker_type TYPE( marker_type ), POINTER :: marker => NULL() CONTAINS SUBROUTINE initSlave IMPLICIT NONE ALLOCATE(marker%slave) END SUBROUTINE SUBROUTINE mergeMarkerLocal IMPLICIT NONE INTEGER :: markerNumber marker%collision%markerNumber2 = markerNumber END SUBROUTINE mergeMarkerLocal END MODULE marker_class USE marker_class IMPLICIT NONE NULLIFY(marker%collision%previous) end $
Local fix
N/A
Problem summary
USERS AFFECTED: Users having derived type objects with allocatable/pointer components in their applications may experience this problem. PROBLEM DESCRIPTION: Compilation may fail due to Internal Compiler Error.
Problem conclusion
The compiler has been fixed and will no longer produce an Internal Compiler Error for the above scenario.
Temporary fix
Comments
APAR Information
APAR number
IV18353
Reported component name
XL FORTRAN FOR
Reported component ID
5724X1500
Reported release
D10
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2012-03-28
Closed date
2012-03-28
Last modified date
2012-03-28
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 FOR
Fixed component ID
5724X1500
Applicable component levels
RD10 PSY U850834
UP C
Document Information
Modified date:
28 March 2012