IBM Support

LI77134: INTERNAL COMPILER ERROR IN ASTI

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • When compiling the provided test case, the compiler produces an
    Internal Compiler Error.
    
    $cat test.f90
    
          use, intrinsic :: iso_c_binding
    
          type(c_ptr) :: cpointer
          integer, pointer :: farray(:,:)
          integer :: arr(2)
    
          call c_f_pointer(cpointer, farray, int(arr(1:2), 8))
    !      call c_f_pointer(cpointer, farray, arr(1:2))
    
          end
    
    
    =====Compiler Command:
    mpixlf2003_r -d -c FreeIPC.f90
    
    
    ===== ACTUAL OUTPUT:
    mpixlf2003_r -d -c FreeIPC.f90
    ** fipc_module   === End of Compilation 1 ===
    1585-100  Internal compiler error -- please contact your service
    representative. For more information visit:
    http://www.ibm.com/support/docview.wss?uid=swg21110810
    1501-511  Compilation failed for file test.f90.
    
    
    ===== EXPECTED OUTPUT:
    Should not produce an internal compiler error.
    

Local fix

  • Replace
       call c_f_pointer(cpointer, farray, int(arr(1:2),8))
    
    with
       call c_f_pointer(cpointer, farray, arr(1:2))
    

Problem summary

  • USERS AFFECTED:
    Users writing C-interoperable Fortran code and call C_F_POINTER
    and convert the type of the shape argument are potentially
    affected by this issue.
    
    PROBLEM DESCRIPTION:
    The compiler abends when converting the type of the shape
    argument to C_F_POINTER intrinsic.
    

Problem conclusion

  • The fix in the compiler is to handle conversion operations on
    SHAPE argument when transforming a call to C_F_POINTER.
    

Temporary fix

Comments

APAR Information

  • APAR number

    LI77134

  • Reported component name

    XL FORTRAN LINU

  • Reported component ID

    5725C7500

  • Reported release

    E10

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2012-12-17

  • Closed date

    2012-12-17

  • Last modified date

    2012-12-17

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

    LI77020

  • 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

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSAT4T","label":"XL Fortran for Linux"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"14.1","Line of Business":{"code":"LOB57","label":"Power"}}]

Document Information

Modified date:
14 October 2021