[Bug libfortran/18495] Intrinisc function SPREAD is broken

[tobi at gcc dot gnu dot org]

------- Additional Comments From tobi at gcc dot gnu dot org  2004-12-02 21:05 -------
I think I know now how the return array is allocated. This is not the error.

An additional error seems to be that a scalar source is not special cased, as
for PACK, see PR17283:
[tobi@marktplatz tests]$ cat spread.f90

real :: a(5)

a = spread (1., 1, 5)
end
[tobi@marktplatz tests]$ gfortran spread.f90
[tobi@marktplatz tests]$ ./a.out
Segmentation fault


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18495