[Bug fortran/78578] character(len=:),allocatable :: CStr(:)

[qingfeng198325 at 126 dot com]

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

--- Comment #2 from zengxiaoqing <qingfeng198325 at 126 dot com> ---
Program Main
  implicit none
  integer :: ins
  type str
     character(len=:),allocatable :: CStr(:)
   end type
   type(str) ::tstr

   allocate(character(len=20)::tstr%CStr(20))

   tstr%CStr(1) = "20"
   tstr%CStr(2:19) = " "
   tstr%CStr(20) ="30"

   print*,tstr%CStr(:)   !error
End Program Main