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

--- Comment #24 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
The following variant does not give the warning

subroutine gfcbug138 (yerrmsg)
  character(kind=1,len=*) :: yerrmsg
  character(kind=1,len=len(yerrmsg)+5) :: tmp
  tmp = 1_"bug: " // yerrmsg
  yerrmsg = tmp
end subroutine gfcbug138

Reply via email to