------- Additional Comments From reichelt at gcc dot gnu dot org  2005-07-15 
16:40 -------
The "ANY" function isn't the culprit.
Building arrays with (/ /) causes the problem:

=======================
subroutine FOO
end subroutine FOO

subroutine BAR
  integer :: J(1)
  J = (/ 1 /)
end subroutine BAR
=======================


-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|[4.0.1/4.1 regression] ICE  |[4.0.1/4.1 regression] ICE
                   |with "any"                  |constructing arrays with "(/
                   |                            |/)"


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

Reply via email to