IV68025: 1517-009: (U) ERROR IN COMPILER RUNTIME SYSTEM

XL Fortran for AIX Fix Pack 4 (July 2015 PTF) for 15.1
XL Fortran for AIX Fix Pack 6 (February 2016 Update) for 15.1
XL Fortran for AIX Fix Pack 7 (May 2016 Update) for 15.1
XL Fortran for AIX Fix Pack 8 (August 2016 Update) for 15.1
XL Fortran for AIX Fix Pack 9 (June 2017 Update) for 15.1
XL Fortran for AIX Fix Pack 10 (February 2018 PTF) for 15.1
XL Fortran for AIX Fix Pack 2 (December 2014 PTF) for 15.1
XL Fortran for AIX Fix Pack 3 (April 2015 PTF) for 15.1
XL Fortran for AIX Fix Pack 5 (November 2015 Update) for 15.1

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 is sysrouted FROM one or more of the following:

  LI78047

• 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

• RF10 PSY