From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 48) id B896C3858C54; Wed, 13 Apr 2022 11:25:33 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org B896C3858C54 From: "jakub at gcc dot gnu.org" To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/105242] [OpenMP] ICE with EXIT in collapsed loop: in gfc_trans_exit, at fortran/trans-stmt.cc:6147 Date: Wed, 13 Apr 2022 11:25:33 +0000 X-Bugzilla-Reason: CC X-Bugzilla-Type: changed X-Bugzilla-Watch-Reason: None X-Bugzilla-Product: gcc X-Bugzilla-Component: fortran X-Bugzilla-Version: 12.0 X-Bugzilla-Keywords: accepts-invalid, diagnostic, openmp X-Bugzilla-Severity: normal X-Bugzilla-Who: jakub at gcc dot gnu.org X-Bugzilla-Status: UNCONFIRMED X-Bugzilla-Resolution: X-Bugzilla-Priority: P3 X-Bugzilla-Assigned-To: unassigned at gcc dot gnu.org X-Bugzilla-Target-Milestone: --- X-Bugzilla-Flags: X-Bugzilla-Changed-Fields: Message-ID: In-Reply-To: References: Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable X-Bugzilla-URL: http://gcc.gnu.org/bugzilla/ Auto-Submitted: auto-generated MIME-Version: 1.0 X-BeenThere: gcc-bugs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-bugs mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 13 Apr 2022 11:25:33 -0000 https://gcc.gnu.org/bugzilla/show_bug.cgi?id=3D105242 --- Comment #2 from Jakub Jelinek --- Why do you say accepts invalid for C/C++? void foo (int i1, int i2, int j1, int j2, int k1, int k2) { int k =3D 1; #pragma omp target parallel for simd collapse(3) firstprivate (k) for (int ii =3D i1; ii <=3D i2; ++ii) for (int jj =3D j1; jj <=3D j2; ++jj) for (int kk =3D k1; kk <=3D k2; ++kk) { if (kk > 5) k =3D 0; if (kk =3D=3D 7) break; } } is certainly rejected: pr105242.c: In function =E2=80=98foo=E2=80=99: pr105242.c:13:13: error: break statement used with OpenMP for loop 13 | break; | ^~~~~ by both C and C++ (all the way back to GCC 6).=