Hell world,

somebody fixed PR 48543 for us, so I have committed the
attached test case as obvious and closed the PR.  Thanks
to however did this!

Regards

        Thomas

2019-01-02  Thomas Koenig  <tkoe...@gcc.gnu.org>

        PR fortran/48543
        * gfortran.dg/const_chararacter_merge.f90: New test.
! { dg-do compile }
! { dg-options "-Os" }
! PR 48543
program main
  character(len=17) :: a
  character(len=34) :: b
  a = 'Supercalifragilis'
  b = 'Supercalifragilisticexpialidocious'
  print *,a," ",b
end program main
! { dg-final { scan-assembler-times "Supercalifragilis" 1 } }

Reply via email to