PI74585: CBL v5.2 Failed assert: .../COBOLUseBeforeSet.cpp:682 using INITCHECK

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• (COB V5.2) Failed assertion Compiler Error encountered when
  compiling with the new V6  option INITCHECK at OPT(1|2). The
  message is the following:
  
  
  682  IGYCB7104-U   Internal error while compiling function
  BGTZJZ31.
  Failed assertion on
  ../../trwcode/optimizer/COBOLUseBeforeSet.cpp:682. Compilation
  terminated.
  

Local fix

• Compile without INITCHECK
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 5.2 compiling      *
  *                 programs using the INITCHECK compiler        *
  *                 option.                                      *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Compiler ABORT with message             *
  *                      IGYCB7104-U Internal error while        *
  *                      compiling function XXXXXXXX. Failed     *
  *                      assertion on                            *
  *                      ../../trwcode/optimizer/COBOLUseBefore  *
  *                      Set.cpp:682.  Compilation terminated.   *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  When an error is detected, the customer program jumps (using GO
  TO) to a section which calls an exit program that stops the
  run.  This program never returns. However, the compiler has no
  way of knowing that the exit program never returns. The
  INITCHECK analysis must therefore consider control flow paths
  that fall through the section that calls the exit program. This
  gives the appearance that PERFORM statements exist in the
  program which can call themselves recursively. Code already
  existed in the compiler to handle such cases. However, that
  code did not properly handle a corner case that occurred while
  compiling this program.
  

Problem conclusion

• The compiler was modified to handle the failing corner case.
  

Temporary fix

Comments

APAR Information

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

  PI72229

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

Modules/Macros

•    IGYCBE
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655W3200

Applicable component levels

• R520 PSY UI44042

     UP17/01/27 P F701

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.