[Bug fortran/43390] logical_dot_product.f90: error: integral result type precision does not match field size of BIT_FIELD_REF

[burnus at gcc dot gnu dot org]

------- Comment #1 from burnus at gcc dot gnu dot org  2010-03-16 13:35 -------
The complete source code (minus comments) is:

   logical :: l1(4) = (/.TRUE.,.FALSE.,.TRUE.,.FALSE./)
   logical :: l2(4) = (/.FALSE.,.TRUE.,.FALSE.,.TRUE./)
   if (dot_product (l1, l2)) call abort ()
   l2 = .TRUE.
   if (.not.dot_product (l1, l2)) call abort ()
end  ! <<< This is line 11


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43390