[Bug middle-end/100905] New: [OpenMP] ICE in convert_nonlocal_omp_clauses, at tree-nested.c:1514 with 'omp loop' in Fortran internal procedure

[Bug middle-end/100905] New: [OpenMP] ICE in convert_nonlocal_omp_clauses, at tree-nested.c:1514 with 'omp loop' in Fortran internal procedure

[burnus at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100905

            Bug ID: 100905
           Summary: [OpenMP] ICE in convert_nonlocal_omp_clauses, at
                    tree-nested.c:1514 with 'omp loop' in Fortran internal
                    procedure
           Product: gcc
           Version: 12.0
            Status: UNCONFIRMED
          Keywords: ice-on-valid-code
          Severity: normal
          Priority: P3
         Component: middle-end
          Assignee: unassigned at gcc dot gnu.org
          Reporter: burnus at gcc dot gnu.org
  Target Milestone: ---

Created attachment 50928
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=50928&action=edit
foo.f90

Long version of the testcase:
https://github.com/SOLLVE/sollve_vv/blob/master/tests/5.0/loop/test_loop_order_concurrent.F90

The following testcase works when the '!$omp loop' is in the main program or a
separate (module) procedure – but it ICEs when it is an internal procedure:

# gfortran foo.f90 -fopenmp

internal compiler error: in convert_nonlocal_omp_clauses, at tree-nested.c:1514
0x7118d7 convert_nonlocal_omp_clauses
        ../../repos/gcc-trunk-commit/gcc/tree-nested.c:1514
0xf455ed convert_nonlocal_reference_stmt
        ../../repos/gcc-trunk-commit/gcc/tree-nested.c:1708

[Bug middle-end/100905] [OpenMP] ICE in convert_nonlocal_omp_clauses, at tree-nested.c:1514 with 'omp loop' in Fortran internal procedure

[burnus at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100905

--- Comment #1 from Tobias Burnus <burnus at gcc dot gnu.org> ---
Tendative patch:

--- a/gcc/tree-nested.c
+++ b/gcc/tree-nested.c
@@ -1484,6 +1484,7 @@ convert_nonlocal_omp_clauses (tree *pclauses, struct
walk_stmt_info *wi)
        case OMP_CLAUSE_AUTO:
        case OMP_CLAUSE_IF_PRESENT:
        case OMP_CLAUSE_FINALIZE:
+       case OMP_CLAUSE_BIND:
        case OMP_CLAUSE__CONDTEMP_:
        case OMP_CLAUSE__SCANTEMP_:
          break;

[Bug middle-end/100905] [OpenMP] ICE in convert_nonlocal_omp_clauses, at tree-nested.c:1514 with 'omp loop' in Fortran internal procedure

[cvs-commit at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100905

--- Comment #2 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Tobias Burnus <burnus@gcc.gnu.org>:

https://gcc.gnu.org/g:c7070b31e12c18905ed0a60aaedd7a071aab5c60

commit r12-1226-gc7070b31e12c18905ed0a60aaedd7a071aab5c60
Author: Tobias Burnus <tobias@codesourcery.com>
Date:   Fri Jun 4 20:52:33 2021 +0200

    OpenMP: Handle bind clause in tree-nested.c [PR100905]

            PR middle-end/100905

    gcc/ChangeLog:

            * tree-nested.c (convert_nonlocal_omp_clauses,
            convert_local_omp_clauses): Handle OMP_CLAUSE_BIND.

    gcc/testsuite/ChangeLog:

            * gfortran.dg/gomp/loop-3.f90: New test.

[Bug middle-end/100905] [OpenMP] ICE in convert_nonlocal_omp_clauses, at tree-nested.c:1514 with 'omp loop' in Fortran internal procedure

[burnus at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100905

Tobias Burnus <burnus at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         Resolution|---                         |FIXED
             Status|UNCONFIRMED                 |RESOLVED

--- Comment #3 from Tobias Burnus <burnus at gcc dot gnu.org> ---
FIXED.

[Bug middle-end/100905] [OpenMP] ICE in convert_nonlocal_omp_clauses, at tree-nested.c:1514 with 'omp loop' in Fortran internal procedure

[pinskia at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=100905

Andrew Pinski <pinskia at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
   Target Milestone|---                         |12.0