Fixes are available
December 2012 Update for XL Fortran for Linux, V14.1
April 2013 Update for XL Fortran for Linux, V14.1
XL Fortran for Linux Fix Pack 4 (October 2013 Update) for 14.1
XL Fortran for Linux Fix Pack 5 (December 2013 Update) for 14.1
XL Fortran for Linux Fix Pack 6 (February 2014 Update) for 14.1
XL Fortran for Linux Fix Pack 7 (May 2014 Update) for 14.1
APAR status
Closed as program error.
Error description
Specifying get_command, get_command_argument, or get_environment_variable in the INTRINSIC statement and compiling with -qintsize=2 or -qintsize=8 causes an erroneous compiler error message. For example, consider the following testcase: $cat test.f90 integer num, len, status character*15 value intrinsic :: get_environment_variable call GET_ENVIRONMENT_VARIABLE('HOME', value, len, status, .true.) print*, value print*, len print*, status stop end Compiling with -qintsize=2 or 8 causes the invalid compiler error: $f90 test.f90 -qintsize=2 "test.f90", line 4.6: 1513-062 (S) Generic procedure reference can not be resolved due to incorrect actual argument attributes. ** _main === End of Compilation 1 === 1501-511 Compilation failed for file test.f90. $f90 test.f90 -qintsize=8 "test.f90", line 4.6: 1513-062 (S) Generic procedure reference can not be resolved due to incorrect actual argument attributes. ** _main === End of Compilation 1 === 1501-511 Compilation failed for file test.f90.
Local fix
Remove the INTRINSIC statement
Problem summary
USERS AFFECTED: XL Fortran users who use the commands described in the problem description are potentialy affected by this issue. PROBLEM DESCRIPTION: Specifying get_command, get_command_argument, or get_environment_variable in the INTRINSIC statement and compiling with -qintsize=2 or -qintsize=8 causes an erroneous compiler error message.
Problem conclusion
The issue has been fixed. If the argument list does not conform to the interface of a generic intrinsic, the fix is to check whether the argument list conforms to the intsize/realsize/autodbl version (if intsize/realsize/autodbl is on).
Temporary fix
Comments
APAR Information
APAR number
LI77166
Reported component name
XL FORTRAN LINU
Reported component ID
5725C7500
Reported release
E10
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2012-12-17
Closed date
2012-12-17
Last modified date
2012-12-17
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 LINU
Fixed component ID
5725C7500
Applicable component levels
RE10 PSN LI77050
UP06/09/13
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSAT4T","label":"XL Fortran for Linux"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"14.1","Line of Business":{"code":"LOB57","label":"Power"}}]
Document Information
Modified date:
14 October 2021