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

Reply via email to