Fixes are available
XL Fortran for AIX Fix Pack 11 (May 2015 PTF) for 14.1
XL Fortran for AIX Fix Pack 12 (August 2015 Update) for 14.1
XL Fortran for AIX Fix Pack 15 (April 2016 Update) for 14.1
XL Fortran for AIX Fix Pack 16 (July 2016 Update) for 14.1
XL Fortran for AIX Fix Pack 17 (November 2016 Update) for 14.1
XL Fortran for AIX Fix Pack 18 (February 2017 Update) for 14.1
XL Fortran for AIX Fix Pack 19 (August 2017 Update) for 14.1
XL Fortran for AIX Fix Pack 7 (March 2014 PTF) for 14.1
XL Fortran for AIX Fix Pack 8 (July 2014 PTF) for 14.1
XL Fortran for AIX Fix Pack 9 (October 2014 PTF) for 14.1
XL Fortran for AIX Fix Pack 10 (February 2015 PTF) for 14.1
XL Fortran for AIX Fix Pack 14 (December 2015 Update) for 14.1
APAR status
Closed as program error.
Error description
Compiling a Fortran source with polymorphic feature usage is encountering an internal compiler error in the xlfhot component of the compiler. ===== TEST CASE ===== (test case is reduced and not valid, but triggers the internal compiler error) MODULE mymod ABSTRACT INTERFACE SUBROUTINE asub () END END INTERFACE TYPE, PUBLIC :: atype CONTAINS PROCEDURE, NOPASS :: get => my_get END TYPE atype CONTAINS SUBROUTINE my_get (parm , proc) real, INTENT( OUT ) :: parm PROCEDURE( asub ), POINTER, OPTIONAL :: proc END SUBROUTINE my_get SUBROUTINE my_sub () CLASS(atype), pointer :: this real :: parm_cart CALL this%get( parm=parm_cart ) END END MODULE mymod > xlf2003 -c test.f90 ** mymod === End of Compilation 1 === 1585-100 Internal compiler error -- please contact your service representative. For more information visit: http://www.ibm.com/support/docview.wss?uid=swg21110810 1501-511 Compilation failed for file test.f90. >
Local fix
Problem summary
PROBLEM DESCRIPTION: Compilation fails due to internal compiler error. USERS AFFECTED: Users having procedure pointer dummy arguments with optional attributes in their applications may experience this problem.
Problem conclusion
The problem has been fixed.
Temporary fix
Comments
APAR Information
APAR number
IV56780
Reported component name
XL FORTRAN FOR
Reported component ID
5725C7400
Reported release
E10
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2014-03-18
Closed date
2014-03-18
Last modified date
2014-03-19
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
5725C7400
Applicable component levels
Document Information
Modified date:
02 October 2021