Mikael Morin wrote:
Add accessor functions to get or set the value of the version field of array
descriptors, and remove from the public API the function giving direct acces
to the field.

gcc/fortran/ChangeLog:

        * trans-descriptor.cc (gfc_conv_descriptor_version): Make static and
        rename ...
        (conv_descriptor_version): ... to this.
        (gfc_conv_descriptor_version_get, gfc_conv_descriptor_version_set):
        New functions.
        * trans-descriptor.h (gfc_conv_descriptor_version): Remove
        declaration.
        (gfc_conv_descriptor_version_get, gfc_conv_descriptor_version_set):
        New declarations.
        * trans.cc (gfc_deallocate_with_status): Use
        gfc_conv_descriptor_version_get to get the value of the version
        field, and gfc_conv_descriptor_version_set to set it.
        * trans-array.cc (gfc_array_allocate, structure_alloc_comps,
        gfc_alloc_allocatable_for_assignment): Likewise.

LGTM,

Thanks,

Tobias

Reply via email to