EXAMPLE #1
[EMAIL PROTECTED] mytests]# cat spread_r.f90; /gcc-4.1/bin/gfortran
spread_r.f90;
./a.out
character*1 :: i, j(10)
i = "w"
j = spread (i, 1, 10)
end
Fortran runtime error: rank mismatch in spread()
EXAMPLE #2
character*1 :: j(10)
j = spread ("w", 1, 10)
end
spread_r.f90: In function MAIN__:
spread_r.f90:2: internal compiler error: Segmentation fault
These and other cases with scalar sources all run with g95 and ifc. This
capability is specified in the standard.
The patch cometh.....
--
Summary: SPREAD does not handle scalar sources.
Product: gcc
Version: 4.1.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: pault at gcc dot gnu dot org
ReportedBy: pault at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=24384