[Bug fortran/117797] [13/14 Regression] ICE in gfc_get_array_span

[cvs-commit at gcc dot gnu.org via Gcc-bugs]

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

--- Comment #5 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-13 branch has been updated by Paul Thomas <pa...@gcc.gnu.org>:

https://gcc.gnu.org/g:61bc5767dbb223506883093fb6ba6be1048e4657

commit r13-9264-g61bc5767dbb223506883093fb6ba6be1048e4657
Author: Paul Thomas <pa...@gcc.gnu.org>
Date:   Thu Dec 12 17:50:56 2024 +0000

    Fortran: Fix testsuite regressions after r15-5083 [PR117797]

    2024-12-12  Paul Thomas  <pa...@gcc.gnu.org>

    gcc/fortran
            PR fortran/117797
            * trans-array.cc (class_array_element_size): New function.
            (gfc_get_array_span): Refactor, using class_array_element_size
            to return the span for descriptors that are the _data component
            of a class expression and then class dummy references. Revert
            the conditions to those before r15-5083 tidying up using 'sym'.

    gcc/testsuite/
            PR fortran/117797
            * gfortran.dg/pr117797.f90: New test.

    (cherry picked from commit d4330ff9bc9a2995e79d88b09a2ee76673167661)