[Bug fortran/42484] ICE with -fopenmp

[janus at gcc dot gnu dot org]

------- Comment #7 from janus at gcc dot gnu dot org  2009-12-27 12:53 -------
Interestingly, the test case also works when using an 'if ... then ... end if'
instead of a simple 'if':

  subroutine sub
    integer :: nRead
    !$omp critical
    if (nRead<3) then
      goto 100
    end if
    !$omp end critical
100 nRead=4
  end subroutine


-- 


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