diff options
| author | Thomas Schwinge <thomas@codesourcery.com> | 2023-10-23 14:24:44 +0200 |
|---|---|---|
| committer | Thomas Schwinge <thomas@codesourcery.com> | 2023-10-25 11:14:25 +0200 |
| commit | a5e919027fdb1900a6f2d64f763c99dbaf98aee6 (patch) | |
| tree | 19ae4acb0552908adf4ebe3fc9a5f99671133020 /gcc/tree-pretty-print.cc | |
| parent | 8064e7e2b5033073911c8d669638a7c61167c0e5 (diff) | |
| download | gcc-a5e919027fdb1900a6f2d64f763c99dbaf98aee6.zip gcc-a5e919027fdb1900a6f2d64f763c99dbaf98aee6.tar.gz gcc-a5e919027fdb1900a6f2d64f763c99dbaf98aee6.tar.bz2 | |
Consistently order 'OMP_CLAUSE_SELF' right after 'OMP_CLAUSE_IF'
As noted in recent commit 3a3596389c2e539cb8fd5dc5784a4e2afe193a2a
"OpenACC 2.7: Implement self clause for compute constructs", the OpenACC 'self'
clause very much relates to the 'if' clause, and therefore copies a lot of the
latter's handling. Therefore it makes sense to also place this handling in
proximity to that of the 'if' clause, which was done in a lot but not all
instances.
gcc/
* tree-core.h (omp_clause_code): Move 'OMP_CLAUSE_SELF' after
'OMP_CLAUSE_IF'.
* tree-pretty-print.cc (dump_omp_clause): Adjust.
* tree.cc (omp_clause_num_ops, omp_clause_code_name): Likewise.
* tree.h: Likewise.
Diffstat (limited to 'gcc/tree-pretty-print.cc')
| -rw-r--r-- | gcc/tree-pretty-print.cc | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/gcc/tree-pretty-print.cc b/gcc/tree-pretty-print.cc index 39ec1df..1fadd75 100644 --- a/gcc/tree-pretty-print.cc +++ b/gcc/tree-pretty-print.cc @@ -587,6 +587,13 @@ dump_omp_clause (pretty_printer *pp, tree clause, int spc, dump_flags_t flags) pp_right_paren (pp); break; + case OMP_CLAUSE_SELF: + pp_string (pp, "self("); + dump_generic_node (pp, OMP_CLAUSE_SELF_EXPR (clause), + spc, flags, false); + pp_right_paren (pp); + break; + case OMP_CLAUSE_NUM_THREADS: pp_string (pp, "num_threads("); dump_generic_node (pp, OMP_CLAUSE_NUM_THREADS_EXPR (clause), @@ -1453,12 +1460,6 @@ dump_omp_clause (pretty_printer *pp, tree clause, int spc, dump_flags_t flags) false); pp_right_paren (pp); break; - case OMP_CLAUSE_SELF: - pp_string (pp, "self("); - dump_generic_node (pp, OMP_CLAUSE_SELF_EXPR (clause), - spc, flags, false); - pp_right_paren (pp); - break; default: gcc_unreachable (); } |