module a
real(8) :: reM, M =99d0
equivalence (M, reM)
end module a
use a
print *, M
end
produces
/tmp/ccaLXlcY.s: Assembler messages:
/tmp/ccaLXlcY.s:42: Error: symbol `a.eq.0_' is already defined
Paul
--
Summary: Initialized module equivalence member causes assembler
error
Product: gcc
Version: unknown
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: paul dot thomas at jet dot uk
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=27324