[Bug fortran/107397] [10/11/12/13 Regression] ICE in gfc_arith_plus, at fortran/arith.cc:654

[anlauf at gcc dot gnu.org]

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

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |anlauf at gcc dot gnu.org
     Ever confirmed|0                           |1
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2022-10-25

--- Comment #1 from anlauf at gcc dot gnu.org ---
Confirmed.

Slightly reduced testcase (w/o assignment):

program p
  type t
     real :: a = 1.0
  end type
  type(t), parameter :: x = z'1'
  print *, x%a + 2
! print *, x%a
end