Sorry to bother you, but I am too stupid to understand how to use bugzilla.
So I send this bug report via the way of last resort.

The following does not link.

 module bla
    logical, save :: blub= .true.
    logical :: pa
    equivalence (blub, pa)
 end module

 program po
 use bla, only : pa

    write (*,*) pa

 end program po

! > gfortran Equivalence-Bug.f90 -static
! /tmp/UserName/ccOoVp3X.o: In function `MAIN__':
! Equivalence-Bug.f90:(.text+0x61): undefined reference to `__bla__pa'
! collect2: ld returned 1 exit status

 Cordially,

 Warner

Reply via email to