LI74477: INTERNAL COMPILER ERROR IN XLFCODE.

April 2009 Update for XL Fortran Advanced Edition for Blue Gene/L, V11.1
September 2010 Update for XL Fortran Advanced Edition for Blue Gene/L, V11.1

APAR status

• Closed as program error.

Error description

• The compiler abends for the following test case with the
  following compile line:
  
  Compile Line:
  xlf95 -c test.f
  
  ===== TESTCASE:
  $cat test.f
    module test
    implicit none
    contains
    elemental function rul(ss)
    character(len=*),intent(in):: ss
    character(len=len(ss)):: rul
    integer:: i,ia
    do i=1,len(ss)
      rul(i:i)=ss(i:i)
    enddo
    end function rul
    subroutine sortc(n, x)
    integer,intent(in):: n
    character(len=*),intent(inout):: x(n)
    character(len=len(x)):: xx(n)
    integer:: i
    xx=rul(x)
    end subroutine sortc
    end module test
  
  
  ===== ACTUAL OUTPUT:
  Internal compiler error; please contact your Service
  Representative
  
  ===== EXPECTED OUTPUT:
  Should not ICE.
  

Local fix

• n/a
  

Problem summary

• Users of elemental functions that return
  characters with runtime length are affected by this issue.
  
  The compiler abends due to bad code generation by
  upper stream components.
  

Problem conclusion

• The compiler was fixed to generate correct instructions to load
  the element length of a character array used in an
  elemental function.
  

Temporary fix

Comments

APAR Information

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

  IZ38369

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

Fix information

• Fixed component name

  XL FORTRAN AE B

• Fixed component ID

  5799HJG00

Applicable component levels

• RB10 PSN IZ38369

     UP06/09/13