[Bug fortran/104128] ICE in gfc_widechar_to_char, at fortran/scanner.c:199

[anlauf at gcc dot gnu.org via Gcc-bugs]

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

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Priority|P3                          |P4
           Keywords|                            |wrong-code

--- Comment #3 from anlauf at gcc dot gnu.org ---
The patch in comment#2 fixes the ICE in comment#0, but uncovers a few issues
with TRANSFER between different integer kinds.  E.g.

program p
  implicit none
  character(kind=4,len=2), parameter :: z    = 4_"FG"
  character(kind=1,len=*), parameter :: x    = transfer (z, 'abcdefgh')
  character(kind=4,len=*), parameter :: v    = transfer (x, z)
  print *, z
  print *, v
  if (v /= z) stop 3
end

shows that we do not get a clean round-trip.