equivalence really broken :-)

[François-Xavier Coudert]

Well, Paul Thomas sent me the attached file (Polyhedron Benchmark
Tests), which does segfault at execution with current CVS gfortran.
The segfault doesn't happen any more if pool and pool3 are not
equivalenced any more, but initialized separately (remove the
equivalence and add "CALL RANDOM_NUMBER(pool3)" just after "CALL
RANDOM_NUMBER(pool)").

Using nightly builds on i686-linux, the segfault appeared between
20051012 and 20051013. I don't have time to reduce it any further, but
here it is.

FX

PS: we should really work on an automated regtesting procedure that
includes code that isn't in the testsuite (mainly for copyright
reasons)
-------------- next part --------------
A non-text attachment was scrubbed...
Name: TEST_FPU.f90
Type: application/octet-stream
Size: 129483 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20051014/8d1e52a2/attachment.obj>