[Bug fortran/66310] Problems with intrinsic repeat for large number of copies

[dominiq at lps dot ens.fr]

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

--- Comment #8 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
> Created attachment 37811
>   --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=37811&action=edit
> Proposed patch
>
> This patch fixes some signed integer problems in a few places and allows the
> test case to compile on my machine up to a size of 2**26 or so before I run 
> out
> of memory.

After having applied the patch, the only change I see is for a variant of the
test in comment 3

   program p
      character, parameter :: z = 'z'
      print *, repeat(z, huge(1_4))
   end

which fails at compile time with

f951: out of memory allocating 18446744065119617024 bytes after a total of 0
bytes

before the patch and with

pr66310_1.f90:3:0:

       print *, repeat(z, huge(1_4))

internal compiler error: Segmentation fault: 11

after the patch.