[Bug fortran/108501] [13 Regression] ICE in get_expr_storage_size, at fortran/interface.cc:2941

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

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

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

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

commit r12-9076-gdaa4c49a4773f274b7a784cedd7b0e0b3c59523b
Author: Harald Anlauf <anl...@gmx.de>
Date:   Mon Jan 23 21:19:03 2023 +0100

    Fortran: avoid ICE on invalid array subscript triplets [PR108501]

    gcc/fortran/ChangeLog:

            PR fortran/108501
            * interface.cc (get_expr_storage_size): Check array subscript
triplets
            that we actually have integer values before trying to extract with
            mpz_get_si.

    gcc/testsuite/ChangeLog:

            PR fortran/108501
            * gfortran.dg/pr108501.f90: New test.

    (cherry picked from commit 771d793df1622a476e1cf8d05f0a6aee350fa56b)