LI75469: INTERNAL COMPILER ERROR WITH -QSMP -QINITAUTO -QAUTODBL

May 2010 Update for XL Fortran for Linux, V12.1
January 2012 Update for XL Fortran for Linux, V12.1
January 2011 Update for XL Fortran for Linux, V12.1
June 2011 Update for XL Fortran for Linux, V12.1
XL Fortran for Linux Fix Pack 8 (January 2014 Update) for 12.1

APAR status

• Closed as program error.

Error description

• The following simple Fortran test case causes the xlf90_r
  compiler to abend in IPA64 with a combination of options:
  
  -qautodbl=dblpad4 -qsmp -qinitauto
  
  
  ===== TESTCASE:
  $cat psgr1.f
         SUBROUTINE PSGR1 ( XLABEL, IPGSIZ )
  
         IMPLICIT NONE
         CHARACTER*(*) :: XLABEL
         INTEGER :: IPGSIZ
         INTEGER :: XAXLEN
  
         IF (IPGSIZ.EQ.0) THEN
            XAXLEN = 560
         END IF
         CALL PSGR2(XAXLEN)
  
         END
  

Local fix

• Use -qsmp=noopt or remove any of the option in the combination
  Or use xlf_r instead
  

Problem summary

• USERS AFFECTED:
  Users of XLF with options -O3 and higher and options -qinitauto
  -qautodbl
  are affected by this issue.
  
  PROBLEM DESCRIPTION:
  The backend optimizer was not allowing an internal flag with 4
  byte entities
  to be stored into 8 byte variables without conversion. Because
  of this,
  the compiler was ending with an internal compiler error.
  

Problem conclusion

• The solution was to teach the backend to allow for this in it's
  auto initialization routine.
  

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

  IZ66384

• APAR is sysrouted TO one or more of the following:

Fix information

• Fixed component name

  XL FORTRAN RHEL

• Fixed component ID

  5724U8410

Applicable component levels

• RC10 PSN IZ66384

     UP06/09/13