This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/42484] ICE with -fopenmp
- From: "janus at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 27 Dec 2009 12:53:59 -0000
- Subject: [Bug fortran/42484] ICE with -fopenmp
- References: <bug-42484-16146@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla 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