IBM Support

LI77166: -QINTSIZE=2 OR 8 CAUSES INCORRECT COMPILER ERROR

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Specifying get_command, get_command_argument, or
    get_environment_variable in the INTRINSIC
    statement and compiling with -qintsize=2 or -qintsize=8 causes
    an erroneous compiler error message.
    
    
    For example, consider the following testcase:
    
    $cat test.f90
    integer num, len, status
    character*15 value
    intrinsic :: get_environment_variable
    call GET_ENVIRONMENT_VARIABLE('HOME', value, len, status,
    .true.)
    print*, value
    print*, len
    print*, status
    stop
    end
    
    
    Compiling with -qintsize=2 or 8 causes the invalid compiler
    error:
    
    
    $f90 test.f90 -qintsize=2
    "test.f90", line 4.6: 1513-062 (S) Generic procedure reference
    can not be resolved due to incorrect actual argument attributes.
    ** _main   === End of Compilation 1 ===
    1501-511  Compilation failed for file test.f90.
    
    $f90 test.f90 -qintsize=8
    "test.f90", line 4.6: 1513-062 (S) Generic procedure reference
    can not be resolved due to incorrect actual argument attributes.
    ** _main   === End of Compilation 1 ===
    1501-511  Compilation failed for file test.f90.
    

Local fix

  • Remove the INTRINSIC statement
    

Problem summary

  • USERS AFFECTED:
    XL Fortran users who use the commands described in the problem
    description are potentialy affected by this issue.
    
    PROBLEM DESCRIPTION:
    Specifying get_command, get_command_argument, or
    get_environment_variable in the INTRINSIC statement and
    compiling with -qintsize=2 or -qintsize=8 causes an erroneous
    compiler error message.
    

Problem conclusion

  • The issue has been fixed.  If the argument list does not
    conform to the interface of a generic intrinsic, the fix is to
    check whether the argument list conforms to the
    intsize/realsize/autodbl version (if intsize/realsize/autodbl
    is on).
    

Temporary fix

Comments

APAR Information

  • APAR number

    LI77166

  • 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:

    LI77050

  • 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