[Bug middle-end/33880] New: ICE: in extract_omp_for_data, at omp-low.c:162

["burnus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

This is with both 4.2 and 4.3 on x86_64/Linux.

gfortran-4.3 -fopenmp a.f90
a.f90: In function 'MAIN__':
a.f90:3: internal compiler error: in extract_omp_for_data, at omp-low.c:162

Test case (by Xavier Andrade):
--------------------------
program testbug
  integer :: ii
  !$omp parallel do
  do ii = 1, 1000
  end do
contains
  subroutine something()
    ii = 0
  end subroutine something
end program testbug
--------------------------


-- 
           Summary: ICE: in extract_omp_for_data, at omp-low.c:162
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code, openmp
          Severity: normal
          Priority: P3
         Component: middle-end
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: burnus at gcc dot gnu dot org


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