]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran/OpenMP: Fix -fopenmp-simd for 'omp assume(s)'
authorTobias Burnus <tobias@codesourcery.com>
Thu, 9 Feb 2023 09:58:00 +0000 (10:58 +0100)
committerTobias Burnus <tobias@codesourcery.com>
Thu, 9 Feb 2023 10:00:26 +0000 (11:00 +0100)
commitae091a44f6a477fbcf463e80fd604540cad3b37f
treea82384300215dfc31bdc19311f107451a6febb32
parent9453e3cd0ffd0c377a648b83a9a5fdc5809e60d7
Fortran/OpenMP: Fix -fopenmp-simd for 'omp assume(s)'

While 'omp assume' is enabled by -fopenmp-simd, 'omp assumes' is not;
however, due to the way parsing works in Fortran (esp. for fixed-form
source code), 'assumes' was parsed by 'assume' which then stumbled over
the tailing 's'.

gcc/fortran/

* parse.cc (decode_omp_directive): Really ignore 'assumes' with
-fopenmp-simd.

gcc/testsuite/

* gfortran.dg/gomp/openmp-simd-8.f90: New test.
gcc/fortran/parse.cc
gcc/testsuite/gfortran.dg/gomp/openmp-simd-8.f90 [new file with mode: 0644]