The below fails with CYGWIN_NT_5.1 + Windows XP (SP2) on AMD Athlon XP2600+ (M)
assertion "a->base == 0" failed: file "../../../gcc-4.0-
20041205/libgfortran/generated/matmul_r8.c",
line 157
Aborted (core dumped)
This does not happen on my Athlon XP1700 machine, nor on a PIV. I have built
the 20041205 cvs and tried various snapshots, all with the same result.
!unless matmul line is substituted
program test_matmul
INTEGER, parameter :: n=2,m=2
real(kind=8), dimension(:,:),allocatable :: unity,x,w
allocate(unity(N,N),x(N,M),w(N,M))
unity(:,1)=(/1,0/) ; x(:,1) =(/1,2/)
unity(:,2)=(/0,1/) ; x(:,2) =(/3,4/)
w=matmul(unity,x) !crashes
!w(1:,1:)=matmul(unity(1:,1:),x(1:,1:)) !does not
print *,all(w.eq.w)
deallocate(unity,x,w)
end program test_matmul
--
Summary: MATMUL failing with ALLOCATED matrices, unless base
indices given
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: libfortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: paulthomas2 at wanadoo dot fr
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=18857
