A fix is available
APAR status
Closed as program error.
Error description
When a complex parameter is multiplied by a constant (whether real, integer or complex), an internal compiler error is encountered. When this constant is assigned to a variable instead, this problem is not observed. ===== COMPILE COMMAND: mpixlf2003 -g -qflttrap -qfullpath test.f90 ===== TESTCASE: $ cat test.f90 program test_cdiv implicit none complex, parameter :: icomp = (0., 1.) complex :: iTest = (2., 1.) ! The below write statement produces compiler error write(*,*) (2.,1.)*icomp ! The below write statement does not produce compiler error ! write(*,*) iTest*iComp end program test_cdiv $ ===== WORKAROUND: A work around which the client has implemented includes NOT using parameter keyword. ===== ACTUAL OUTPUT: $ mpixlf2003 -g -qflttrap -qfullpath test.f90 1517-009: (U) Error in compiler runtime system; compilation ended. /opt/ibmcmp/xlf/bg/14.1/bin/.orig/bgxlf2003: 1501-230 (S) 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. $ ===== EXPECTED OUTPUT: Compiler should not abend
Local fix
A work around which the client has implemented includes NOT using parameter keyword.
Problem summary
USERS AFFECTED: Users having operations on complex constants in their applications may experience this problem when they specify -qflttrap. PROBLEM DESCRIPTION: Compilation may fail while folding arithmetic operations on complex constants at compile-time.
Problem conclusion
The problem has been fixed.
Temporary fix
Comments
APAR Information
APAR number
LI78479
Reported component name
XL FORTRAN LINU
Reported component ID
5725C7500
Reported release
F10
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt
Submitted date
2015-02-25
Closed date
2015-02-25
Last modified date
2015-02-25
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
RF10 PSN LI78047
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":"15.1","Line of Business":{"code":"LOB57","label":"Power"}}]
Document Information
Modified date:
17 October 2021