Hi, the following program fails to compile with rev.128283 but used to work just a few days ago:
% cat gfcbug70.f90 module foo implicit none public chk type mytype character(len=4) :: str end type mytype type (mytype) ,parameter :: chk (1) = (/ mytype ("abcd") /) end module foo module gfcbug70 use foo, only: chk_ => chk implicit none contains subroutine chk (i) integer, intent(in) :: i print *, chk_(i)% str end subroutine chk end module gfcbug70 I get: /tmp/ccnnONGa.s: Assembler messages: /tmp/ccnnONGa.s:19: Error: symbol `__gfcbug70_MOD_chk' is already defined -- Summary: [4.3 regression] USE with renaming, assembler message: symbol already defined Product: gcc Version: 4.3.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: anlauf at gmx dot de GCC host triplet: i686-pc-linux-gnu http://gcc.gnu.org/bugzilla/show_bug.cgi?id=33376