[Bug fortran/36590] internal error: Can't convert LOGICAL(1) to LOGICAL(1)

[burnus at gcc dot gnu dot org]

------- Comment #5 from burnus at gcc dot gnu dot org  2008-06-22 12:28 -------
The error only occurs for logical(1), kind=2,4,8,16 all work.
The program also works if one removes the .not.

  interface Near0
    function Near0_dp (TestNumber) result (NumberNear0)
      real       :: TestNumber(2)
      logical(1) :: NumberNear0(2)
    end function Near0_dp
  end interface
  real :: PolyMTFWeight(2)
  i = count (.not. Near0 (PolyMTFWeight(1:2)))
end


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
            Summary|internal error              |internal error: Can't
                   |                            |convert LOGICAL(1) to
                   |                            |LOGICAL(1)


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