[Bug fortran/83977] New: [8 Regression] ICE in simd_clone_clauses_extract, at omp-simd-clone.c:184

["gscfq at t-online dot de" <gcc-bugzilla at gcc dot gnu dot org>]

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

            Bug ID: 83977
           Summary: [8 Regression] ICE in simd_clone_clauses_extract, at
                    omp-simd-clone.c:184
           Product: gcc
           Version: 8.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
          Assignee: unassigned at gcc dot gnu.org
          Reporter: gscfq@t-online.de
  Target Milestone: ---

Changed between 20170924 and 20171008 :


$ cat z1.f90
integer function f(a, b)
   integer :: a, b
!$omp declare simd uniform(b) linear(ref(a):b)
   a = a + 1
!$omp parallel
   call sub
!$omp end parallel
end


$ gfortran-8-20170924 -c z1.f90 -fopenmp
$
$ gfortran-8-20180121 -c z1.f90 -fopenmp
during IPA pass: simdclone
z1.f90:8:0:

 end

internal compiler error: in simd_clone_clauses_extract, at omp-simd-clone.c:184
0x1279348 simd_clone_clauses_extract
        ../../gcc/omp-simd-clone.c:183
0x1279348 expand_simd_clones
        ../../gcc/omp-simd-clone.c:1599
0x1279348 ipa_omp_simd_clone
        ../../gcc/omp-simd-clone.c:1690
0x1279348 execute
        ../../gcc/omp-simd-clone.c:1718