https://gcc.gnu.org/bugzilla/show_bug.cgi?id=68566
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |kargl at gcc dot gnu.org
--- Comment #2 from kargl at gcc dot gnu.org ---
(In reply to Gerhard Steinmetz from comment #0)
> Using wrong defined array a :
>
> $ cat z1.f90
> program p
> integer, parameter :: n = 2
> integer, parameter :: a(:) = 0
> integer, parameter :: b(n, n) = reshape([a, 1+a], [n, n])
> end
>
>
> $ gfortran -g -O0 -Wall -fcheck=all z1.f90
> *** Error in `/usr/lib64/gcc/x86_64-suse-linux/5/f951': double free or
> corruption (fasttop): 0x00000000028e93f0 ***
> ...
> f951: internal compiler error: Aborted
With trunk, I get
laptop-kargl:kargl[247] gfc -c c1.f90
c1.f90:3:29:
integer, parameter :: a(:) = 0
1
Error: Parameter array 'a' at (1) cannot be automatic or of deferred shape
