[Bug fortran/87980] ICE in gfc_conv_descriptor_data_get, at fortran/trans-array.c for assignment on allocatable polymorphic variable

[Bug fortran/87980] ICE in gfc_conv_descriptor_data_get, at fortran/trans-array.c for assignment on allocatable polymorphic variable

[juergen.reuter at desy dot de]

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

--- Comment #7 from Jürgen Reuter <juergen.reuter at desy dot de> ---
Is anybody ever looked into this? Any updates?

[Bug fortran/87980] ICE in gfc_conv_descriptor_data_get, at fortran/trans-array.c for assignment on allocatable polymorphic variable

[juergen.reuter at desy dot de]

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

--- Comment #8 from Jürgen Reuter <juergen.reuter at desy dot de> ---
The actual workaround that I'm using (the code is from of our stale branches
which recently became active again) is:

[...]
 subroutine qn_string_set (qns, col)
    class(qn_string_t), intent(inout) :: qns
    class(col_t), dimension(:), intent(in), optional :: col
    class(col_t), allocatable :: col0
    integer :: i
    do i = 1, qns%length
       if (present (col)) then
          col0 = col(i)
          call qns%qn(i)%set (col=col0)
       end if
    end do
  end subroutine qn_string_set

end module quantum_numbers
[...]

This seems to work in our code, i.e. it compiles and it does what it should.
But in the long run, would be great to get it fixed for gcc/gfortran 12.