program test logical(kind=1),parameter :: t=.true.,f=.false. logical(kind=1),dimension(9) :: hexa,hexb data hexa/f,f,t,t,f,f,f,t,f/,hexb/f,t,f,f,f,t,t,f,f/ isum=count(hexa(1:9).eqv.hexb(1:9)) print*, isum end program
with gfortran from gcc 4.3.1 above code produces: test.f90:10.11: end program 1 Internal Error at (1): test.f90:6.30: isum=count(hexa(1:9).eqv.hexb(1:9)) 1 Can't convert LOGICAL(1) to LOGICAL(1) at (1) but no error with gfortran 4.2.1 -- Summary: compiler error message with gfortran 4.3.1 but not with 4.2.1 Product: gcc Version: unknown Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassigned at gcc dot gnu dot org ReportedBy: hatz at wuw dot at http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36681