Fixes are available
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
When compiling a generic binding similar to the example below, the compiler is incorrectly interpreting the binding as ambiguous. ===== EXAMPLE CODE ===== type my_type contains procedure, pass(val) :: my_sub_1 procedure, pass(val) :: my_sub_2 generic :: intr => my_sub_1, my_sub_2 end type ===== ERROR MESSAGE ===== 1514-714 (S) Procedures my_sub_2 and my_sub_1 must not appear in the same generic interface. The dummy argument that disambiguates the procedures by argument keyword appears earlier in the argument list than the dummy argument that disambiguates by position.
Local fix
Removing the PASS object dummy arguments and converting into a generic interface block does not consider the interface ambiguous, and does not encounter the error message.
Problem summary
PROBLEM DESCRIPTION: When checking generic bindings for ambiguity, if the bindings contains a pair of PASS specific bindings where one specific binding: 1. Contains fewer non-optional dummy arguments than the other specific binding, and 2. The passed object dummy argument in this binding occurs earlier in the argument list than the PASS object dummy argument in the other specific binding. XL Fortran incorrectly interprets the generic binding as ambiguous. This problem does not affect generic bindings involving NOPASS specific bindings. It also does not affect generic interface blocks. USERS AFFECTED: User of XL Fortran using generic bindings involving passed object dummy arguments.
Problem conclusion
The problem has been fixed.
Temporary fix
Comments
APAR Information
APAR number
IV21657
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-05-22
Closed date
2012-07-05
Last modified date
2012-07-05
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 U851839
UP C
Document Information
Modified date:
05 July 2012