https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66310
--- Comment #20 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
(In reply to Dominique d'Humieres from comment #19)
> > Can this be closed.
>
> The problem is not fixed in 32-bit mode.
Dominique, what are you seeing? This is working fine with my system with -m32.
program p
character(kind=1), parameter :: z = 'z'
integer, parameter :: big = 536870911
!print *, repeat(z, huge(1_4)/4)
!print *, (huge(1)-1)/4, huge(1) - 1
print *, repeat(z, big)
end
