LI77682: INCORRECT OUTPUT FROM FORTRAN/C BINDING PROCEDURE WITH -O

XL Fortran for Linux Fix Pack 4 (October 2013 Update) for 14.1
XL Fortran for Linux Fix Pack 5 (December 2013 Update) for 14.1
XL Fortran for Linux Fix Pack 6 (February 2014 Update) for 14.1
XL Fortran for Linux Fix Pack 7 (May 2014 Update) for 14.1

APAR status

• Closed as program error.

Error description

• A testcase is composed of a C program and a Fortran program.
  In the Fortran source code, an array of C-type pointers is
  defined. The malloc() function from libc is called to allocate
  each of these pointers and the array is displayed to the user
  in two ways
  1. With a Fortran function
  2. With a C function
  
  When both C and Fortran source files are compiled with no
  optimization (-O0) then both functions show the same results.
  However, wrong runtime results are displayed for the C function
  if optimizatino is used to compile the Fortran program.
  

Local fix

• Alter the code to pass elements of the array one by one to the
  C function.
  

Problem summary

• PROBLEM DESCRIPTION: when passing a pointer structure member as
  argument to a bind(c) procedure, wrong values are received on
  the C side
  
  USERS AFFECTED: Any user who passes a structure member to a
  bind(c) procedure and compiles at -O2 and above
  

Problem conclusion

• The problem has been fixed. Apply applicable service.
  

Temporary fix

Comments

APAR Information

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

  IV37232

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

Fix information

• Fixed component name

  XL FORTRAN LINU

• Fixed component ID

  5725C7500

Applicable component levels

• RE10 PSN IV37232

     UP06/09/13