http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46753
Summary: ICE: OpenMP - in extract_omp_for_data, at
omp-low.c:335
Product: gcc
Version: 4.5.1
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassig...@gcc.gnu.org
ReportedBy: lo...@cray.com
> cat test.f90
program F03_E_3a
use omp_lib
implicit none
integer, parameter :: NT = 4
integer, parameter :: INT32_MAX = 2147483647 ! 2**31-1
integer :: i, j, thread_num = -1
call omp_set_dynamic(.false.)
call omp_set_num_threads(NT)
!$omp parallel do collapse(2) schedule(static, 1) lastprivate(thread_num)
do i = 1, INT32_MAX - 1
do j = 0, NT-1
thread_num = omp_get_thread_num()
if (j /= thread_num) then
print *, 'FAIL - j == ', j, ' (expected ', thread_num, ')'
stop 1
end if
end do
end do
!$omp end parallel do
end program F03_E_3a
> gfortran -fopenmp test.f90
test.f90: In function 'f03_e_3a':
test.f90:11:0: internal compiler error: in extract_omp_for_data, at
omp-low.c:335
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.
