On Mon, Aug 30, 2021 at 8:27 AM Jakub Jelinek via Gcc-patches < gcc-patc...@gcc.gnu.org> wrote:
> On Wed, Aug 25, 2021 at 12:14:09PM +0200, Marcel Vollweiler wrote: > > Add support for device-modifiers for 'omp target device'. > > > > 'device_num' and 'ancestor' are now parsed on target device constructs > for C, > > C++, and Fortran (see OpenMP specification 5.0, p. 170). When 'ancestor' > is > > used, then 'sorry, not supported' is output. Moreover, the restrictions > for > > 'ancestor' are implemented (see OpenMP specification 5.0, p. 174f). > > > > gcc/c/ChangeLog: > > > > * c-parser.c (c_parser_omp_clause_device): Parse device-modifiers > 'device_num' > > and 'ancestor' in 'target device' clauses. > > > > gcc/cp/ChangeLog: > > > > * parser.c (cp_parser_omp_clause_device): Parse device-modifiers > 'device_num' > > and 'ancestor' in 'target device' clauses. > > * semantics.c (finish_omp_clauses): Error handling. Constant > device ids must > > evaluate to '1' if 'ancestor' is used. > > > > gcc/fortran/ChangeLog: > > > > * gfortran.h: Add variable for 'ancestor' in struct > gfc_omp_clauses. > > * openmp.c (gfc_match_omp_clauses): Parse device-modifiers > 'device_num' > > and 'ancestor' in 'target device' clauses. > > * trans-openmp.c (gfc_trans_omp_clauses): Set > OMP_CLAUSE_DEVICE_ANCESTOR. > > > > gcc/ChangeLog: > > > > * gimplify.c (gimplify_scan_omp_clauses): Error handling. > 'ancestor' only > > allowed on target constructs and only with particular other > clauses. > > * omp-expand.c (expand_omp_target): Output of 'sorry, not > supported' if > > 'ancestor' is used. > > * omp-low.c (check_omp_nesting_restrictions): Error handling. No > nested OpenMP > > structs when 'ancestor' is used. > > (scan_omp_1_stmt): No usage of OpenMP runtime routines in a target > region when > > 'ancestor' is used. > > * tree-pretty-print.c (dump_omp_clause): Append 'ancestor'. > > * tree.h (OMP_CLAUSE_DEVICE_ANCESTOR): Define macro. > > > > gcc/testsuite/ChangeLog: > > > > * c-c++-common/gomp/target-device-1.c: New test. > > * c-c++-common/gomp/target-device-2.c: New test. > > * c-c++-common/gomp/target-device-ancestor-1.c: New test. > > * c-c++-common/gomp/target-device-ancestor-2.c: New test. > > * c-c++-common/gomp/target-device-ancestor-3.c: New test. > > * c-c++-common/gomp/target-device-ancestor-4.c: New test. > > * gfortran.dg/gomp/target-device-1.f90: New test. > > * gfortran.dg/gomp/target-device-2.f90: New test. > > * gfortran.dg/gomp/target-device-ancestor-1.f90: New test. > > * gfortran.dg/gomp/target-device-ancestor-2.f90: New test. > > * gfortran.dg/gomp/target-device-ancestor-3.f90: New test. > > * gfortran.dg/gomp/target-device-ancestor-4.f90: New test. > The last new test fails on aarch64: /gcc/testsuite/gfortran.dg/gomp/target-device-ancestor-4.f90:7:15: Error: Sorry, 'reverse_offload' clause at (1) on REQUIRES directive is not yet supported compiler exited with status 1 PASS: gfortran.dg/gomp/target-device-ancestor-4.f90 -O (test for errors, line 7) XFAIL: gfortran.dg/gomp/target-device-ancestor-4.f90 -O sorry, unimplemented: 'ancestor' not yet supported (test for warnings, line 9) PASS: gfortran.dg/gomp/target-device-ancestor-4.f90 -O (test for excess errors) gfortran.dg/gomp/target-device-ancestor-4.f90 -O : dump file does not exist UNRESOLVED: gfortran.dg/gomp/target-device-ancestor-4.f90 -O scan-tree-dump original "pragma omp target [^\n\r)]*device\\(ancestor:1\\)" Can you fix it? Thanks, Christophe > Ok, thanks. > > Jakub > >