Fortran Testcase:
SUBROUTINE A13( X, XOLD, N, TOL )
!$OMP PARALLEL
DO WHILE( TOOBIG > 0 )
!$OMP MASTER
PRINT *, "Iteration ", C, " TOOBIG=", TOOBIG
!$OMP END MASTER
ENDDO
!$OMP END PARALLEL
END SUBROUTINE A12
----------------
We get:
D.1056 = *(.omp_data_i->toobig);
Which is obviously not gimple.
Again the testcase in PR 30142 is used to test for this.
--
Summary: OpenMP can produce invalid gimple (for indirect
references)
Product: gcc
Version: 4.3.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: middle-end
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: pinskia at gcc dot gnu dot org
OtherBugsDependingO 30142
nThis:
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30167