[Bug fortran/89266] ICE with TRANSFER of len=0 character array constructor

[anlauf at gmx dot de]

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

--- Comment #5 from Harald Anlauf <anlauf at gmx dot de> ---
Alternative versions to test case #2:

program test
  implicit none
  character(1), save      :: z = transfer ([                ''], '*') ! ICE
! character(1), save      :: z = transfer ([character(0) :: ''], '*') ! ICE
! character(1), save      :: z = transfer ([character(1) :: ''], '*') ! works
  print *,"'",z,"'",len(z)
end