LI75312: TRAP ENCOUNTERED IN ASTI MESSAGE

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

• Following error occurs in test.F file at compile time:
  
  ------------------------------------------------------
  ** mysbrt   === End of Compilation 1 ===
    Trap encountered in ASTI:
    SIGABRT - Abort
  
    Traceback:
  
    Offset 0x000001e4 in StmtWalk
    Offset 0x0000063c in StmtWalk
    Offset 0x000004d8 in StmtWalk
    Offset 0x0000063c in StmtWalk
    Offset 0x0000067c in ScForallScalarizeStmt
    Offset 0x00000e4c in ScProcessStmt
    Offset 0x00000150 in StmtWalk
    Offset 0x00000360 in StmtWalk
    Offset 0x00000170 in Scalarizer
    Offset 0x000002cc in astidrvr
    Offset 0x00000898 in main
  
    --- End of call chain ---
  1501-511  Compilation failed for file test.F
  ------------------------------------------------------
  ============TESTCASE================
  
  ------------------ test.F ---------------------
        subroutine mysbrt ( myfileh , myfilet )
  
        implicit none
  
        character myfileh*(*), myfilet*(*)
  
  C
  C Internal variables
  C
  
        integer a, b
  
        real, dimension(:), pointer, save ::      c
        real, dimension(:,:),   pointer, save   :: d
  
        if (myfilet/=' ' .or. myfileh/=' ') then
          forall(a=1:b)
       .    d(:,a) = d(:,a) + c(:) / b
        endif
  
        end
  
  --------------------- end of test.F -------------------
  

Local fix

• N/A
  

Problem summary

• A fix for short-circuit evaluation did not correctly scope code
  generated for deallocation.
  

Problem conclusion

• Extend functionality for deallocating this sort of temp in the
  scope of short-circuit ifs.
  

Temporary fix

Comments

APAR Information

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

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

  LI75463 IZ76911

Fix information

• Fixed component name

  XL FORTRAN SLES

• Fixed component ID

  5724U8400

Applicable component levels

• RC10 PSY

     UP