LI77427: INCORRECT SAVE ATTRIBUTE ERROR MESSAGE

Subscribe

You can track all active APARs for this component.

APAR status

  • Closed as program error.

Error description

  • Compiling a Fortran 2008 application using a derived type with
    default initialization encounters an invalid compiler error
    regarding the SAVE attribute:
    
    
      ===== TEST CASE =====
    
    MODULE p
      IMPLICIT NONE
      TYPE, PUBLIC :: a
         INTEGER                       :: num = 0
      END TYPE a
      INTEGER, PARAMETER, PRIVATE :: n = 118
      TYPE( a ), PUBLIC :: table( 0:n )
    END MODULE p
    
    
    "test.f90", line 1.1: 1513-191 (S) A variable declared in the
    scope of a module, table, that is of a derived type with default
     initialization, must have the SAVE attribute.
    
    
    Module variables with Fortran 2008 should automatically have the
    SAVE attribute.
    

Local fix

  • Compile with -qsave=defaultinit option.
    

Problem summary

  • PROBLEM DESCRIPTION:
    A module variable of a type with default initialization must
    have the SAVE attribute by the Fortran 2003 or earlier
    standards.  XL Fortran correctly flags this case, however
    module variables implicitly have the SAVE attribute by the
    Fortran 2008 standard.  XL Fortran incorrectly emits an error
    message in the later case.
    
    USERS AFFECTED:
    Users having module variables of a type with default
    initialization in their applications and using a language level
    of Fortran 2008 or above will see this problem.
    

Problem conclusion

  • The problem has been fixed.
    

Temporary fix

Comments

APAR Information

  • APAR number

    LI77427

  • Reported component name

    XL FORTRAN FOR

  • Reported component ID

    5799AH100

  • Reported release

    E10

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt

  • Submitted date

    2013-06-12

  • Closed date

    2013-09-11

  • Last modified date

    2013-09-11

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

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

    IV49323 LI77660

Fix information

  • Fixed component name

    XL FORTRAN FOR

  • Fixed component ID

    5799AH100

Applicable component levels

  • RE10 PSY

       UP



Rate this page:

(0 users)Average rating

Add comments

Document information


More support for:

XL Fortran for Blue Gene/Q

Software version:

ALL VERSIONS

Reference #:

LI77427

Modified date:

2013-09-11

Translate my page

Machine Translation

Content navigation