1! { dg-do compile }
2!
3! PR32472 -- character literals were not implemented in REPEAT.
4!
5! Contributed by Tobias Burnus <burnus@gcc.gnu.org>
6!
7  CHARACTER(len=1025) :: string2 = repeat('?',1025)
8  print *, string2
9end
10