[Bug fortran/100097] New: Unlimited polymorphic pointers and allocatables have incorrect rank

[Bug fortran/100097] New: Unlimited polymorphic pointers and allocatables have incorrect rank

[jrfsousa at gmail dot com]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100097

            Bug ID: 100097
           Summary: Unlimited polymorphic pointers and allocatables have
                    incorrect rank
           Product: gcc
           Version: 11.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: jrfsousa at gmail dot com
  Target Milestone: ---

Created attachment 50600
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=50600&action=edit
Fortran code showing problem

Hi All!

Rank information is not correctly written into the pointer and allocatable
unlimited polymorphic descriptors.

Seen on:

GNU Fortran (GCC) 11.0.1 20210415 (experimental)
GNU Fortran (GCC) 10.3.1 20210415

Thank you very much.

Best regards,
José Rui

[Bug fortran/100097] Unlimited polymorphic pointers and allocatables have incorrect rank

[dominiq at lps dot ens.fr]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100097

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
     Ever confirmed|0                           |1
   Last reconfirmed|                            |2021-04-16
             Status|UNCONFIRMED                 |NEW

--- Comment #1 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
Confirmed.

[Bug fortran/100097] Unlimited polymorphic pointers and allocatables have incorrect rank

[jrfsousa at gmail dot com]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100097

--- Comment #2 from José Rui Faustino de Sousa <jrfsousa at gmail dot com> ---
Patch posted.

https://gcc.gnu.org/pipermail/fortran/2021-April/055933.html

[Bug fortran/100097] Unlimited polymorphic pointers and allocatables have incorrect rank

[cvs-commit at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100097

--- Comment #3 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Harald Anlauf <anlauf@gcc.gnu.org>:

https://gcc.gnu.org/g:4cfdaeb2755121ac1069f09898def56469b0fb51

commit r13-3440-g4cfdaeb2755121ac1069f09898def56469b0fb51
Author: José Rui Faustino de Sousa <jrfsousa@gmail.com>
Date:   Tue Oct 18 22:29:59 2022 +0200

    Fortran: Add missing TKR initialization to class variables [PR100097,
PR100098]

    gcc/fortran/ChangeLog:

            PR fortran/100097
            PR fortran/100098
            * trans-array.cc (gfc_trans_class_array): New function to
            initialize class descriptor's TKR information.
            * trans-array.h (gfc_trans_class_array): Add function prototype.
            * trans-decl.cc (gfc_trans_deferred_vars): Add calls to the new
            function for both pointers and allocatables.

    gcc/testsuite/ChangeLog:

            PR fortran/100097
            PR fortran/100098
            * gfortran.dg/PR100097.f90: New test.
            * gfortran.dg/PR100098.f90: New test.

[Bug fortran/100097] Unlimited polymorphic pointers and allocatables have incorrect rank

[cvs-commit at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100097

--- Comment #4 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-12 branch has been updated by Harald Anlauf
<anlauf@gcc.gnu.org>:

https://gcc.gnu.org/g:2b20cf18a62842e2659e891b0c607769638e07f9

commit r12-8877-g2b20cf18a62842e2659e891b0c607769638e07f9
Author: José Rui Faustino de Sousa <jrfsousa@gmail.com>
Date:   Tue Oct 18 22:29:59 2022 +0200

    Fortran: Add missing TKR initialization to class variables [PR100097,
PR100098]

    gcc/fortran/ChangeLog:

            PR fortran/100097
            PR fortran/100098
            * trans-array.cc (gfc_trans_class_array): New function to
            initialize class descriptor's TKR information.
            * trans-array.h (gfc_trans_class_array): Add function prototype.
            * trans-decl.cc (gfc_trans_deferred_vars): Add calls to the new
            function for both pointers and allocatables.

    gcc/testsuite/ChangeLog:

            PR fortran/100097
            PR fortran/100098
            * gfortran.dg/PR100097.f90: New test.
            * gfortran.dg/PR100098.f90: New test.

    (cherry picked from commit 4cfdaeb2755121ac1069f09898def56469b0fb51)

[Bug fortran/100097] Unlimited polymorphic pointers and allocatables have incorrect rank

[cvs-commit at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100097

--- Comment #5 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-11 branch has been updated by Harald Anlauf
<anlauf@gcc.gnu.org>:

https://gcc.gnu.org/g:f6e4a3b40b69e4f682db2fe49139b17de1b2ef8c

commit r11-10345-gf6e4a3b40b69e4f682db2fe49139b17de1b2ef8c
Author: José Rui Faustino de Sousa <jrfsousa@gmail.com>
Date:   Tue Oct 18 22:29:59 2022 +0200

    Fortran: Add missing TKR initialization to class variables [PR100097,
PR100098]

    gcc/fortran/ChangeLog:

            PR fortran/100097
            PR fortran/100098
            * trans-array.c (gfc_trans_class_array): New function to
            initialize class descriptor's TKR information.
            * trans-array.h (gfc_trans_class_array): Add function prototype.
            * trans-decl.c (gfc_trans_deferred_vars): Add calls to the new
            function for both pointers and allocatables.

    gcc/testsuite/ChangeLog:

            PR fortran/100097
            PR fortran/100098
            * gfortran.dg/PR100097.f90: New test.
            * gfortran.dg/PR100098.f90: New test.

    (cherry picked from commit 4cfdaeb2755121ac1069f09898def56469b0fb51)

[Bug fortran/100097] Unlimited polymorphic pointers and allocatables have incorrect rank

[anlauf at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100097

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|---                         |FIXED
                 CC|                            |anlauf at gcc dot gnu.org

--- Comment #6 from anlauf at gcc dot gnu.org ---
Fixed.

Thanks for the patch!