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

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
     Ever confirmed|0                           |1
             Status|UNCONFIRMED                 |NEW
                 CC|                            |anlauf at gcc dot gnu.org
            Summary|ICE(segfault) in            |[13/14 Regression]
                   |gfc_expression_rank() from  |ICE(segfault) in
                   |gfc_op_rank_conformable()   |gfc_expression_rank() from
                   |                            |gfc_op_rank_conformable()
   Last reconfirmed|                            |2023-05-24

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

Further reduced:

subroutine foo(y, x)
  implicit none
  real :: y(:)
  real :: x(:)

  associate(z=>y)
    where ( z < 0.0 ) x(:) = z(:)
    where ( z < 0.0 ) x(:) = z(:)
  end associate

end subroutine foo

Reply via email to