From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 1643) id E47AA3894C0F; Mon, 9 Aug 2021 13:20:50 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org E47AA3894C0F MIME-Version: 1.0 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset="utf-8" From: Thomas Schwinge To: gcc-cvs@gcc.gnu.org Subject: [gcc r12-2820] Cross-reference parts adapted in 'gcc/omp-oacc-neuter-broadcast.cc' X-Act-Checkin: gcc X-Git-Author: Thomas Schwinge X-Git-Refname: refs/heads/master X-Git-Oldrev: c408512e1f7ca07e07794dc13fd6dfd9d2d7e998 X-Git-Newrev: 62f01243fb27030b8d99c671f27349c2e7465edc Message-Id: <20210809132050.E47AA3894C0F@sourceware.org> Date: Mon, 9 Aug 2021 13:20:50 +0000 (GMT) X-BeenThere: gcc-cvs@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gcc-cvs mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Mon, 09 Aug 2021 13:20:51 -0000 https://gcc.gnu.org/g:62f01243fb27030b8d99c671f27349c2e7465edc commit r12-2820-g62f01243fb27030b8d99c671f27349c2e7465edc Author: Thomas Schwinge Date: Mon Aug 9 12:21:43 2021 +0200 Cross-reference parts adapted in 'gcc/omp-oacc-neuter-broadcast.cc' gcc/ * config/nvptx/nvptx.c: Cross-reference parts adapted in 'gcc/omp-oacc-neuter-broadcast.cc'. * omp-low.c: Likewise. * omp-oacc-neuter-broadcast.cc: Cross-reference parts adapted from the above files. Diff: --- gcc/config/nvptx/nvptx.c | 5 +++++ gcc/omp-low.c | 2 ++ gcc/omp-oacc-neuter-broadcast.cc | 9 ++++++++- 3 files changed, 15 insertions(+), 1 deletion(-) diff --git a/gcc/config/nvptx/nvptx.c b/gcc/config/nvptx/nvptx.c index 6642bdfa867..4e4909e8c5f 100644 --- a/gcc/config/nvptx/nvptx.c +++ b/gcc/config/nvptx/nvptx.c @@ -3205,6 +3205,7 @@ nvptx_mach_vector_length () /* Loop structure of the function. The entire function is described as a NULL loop. */ +/* See also 'gcc/omp-oacc-neuter-broadcast.cc:struct parallel_g'. */ struct parallel { @@ -3282,6 +3283,7 @@ typedef auto_vec insn_bb_vec_t; partitioning mode of the function as a whole. Populate MAP with head and tail blocks. We also clear the BB visited flag, which is used when finding partitions. */ +/* See also 'gcc/omp-oacc-neuter-broadcast.cc:omp_sese_split_blocks'. */ static void nvptx_split_blocks (bb_insn_map_t *map) @@ -3383,6 +3385,7 @@ nvptx_discover_pre (basic_block block, int expected) } /* Dump this parallel and all its inner parallels. */ +/* See also 'gcc/omp-oacc-neuter-broadcast.cc:omp_sese_dump_pars'. */ static void nvptx_dump_pars (parallel *par, unsigned depth) @@ -3408,6 +3411,7 @@ nvptx_dump_pars (parallel *par, unsigned depth) /* If BLOCK contains a fork/join marker, process it to create or terminate a loop structure. Add this block to the current loop, and then walk successor blocks. */ +/* See also 'gcc/omp-oacc-neuter-broadcast.cc:omp_sese_find_par'. */ static parallel * nvptx_find_par (bb_insn_map_t *map, parallel *par, basic_block block) @@ -3488,6 +3492,7 @@ nvptx_find_par (bb_insn_map_t *map, parallel *par, basic_block block) to head & tail markers, discovered when splitting blocks. This speeds up the discovery. We rely on the BB visited flag having been cleared when splitting blocks. */ +/* See also 'gcc/omp-oacc-neuter-broadcast.cc:omp_sese_discover_pars'. */ static parallel * nvptx_discover_pars (bb_insn_map_t *map) diff --git a/gcc/omp-low.c b/gcc/omp-low.c index 2f735bcde9c..926087da701 100644 --- a/gcc/omp-low.c +++ b/gcc/omp-low.c @@ -615,6 +615,8 @@ omp_copy_decl_1 (tree var, omp_context *ctx) /* Build COMPONENT_REF and set TREE_THIS_VOLATILE and TREE_READONLY on it as appropriate. */ +/* See also 'gcc/omp-oacc-neuter-broadcast.cc:oacc_build_component_ref'. */ + static tree omp_build_component_ref (tree obj, tree field) { diff --git a/gcc/omp-oacc-neuter-broadcast.cc b/gcc/omp-oacc-neuter-broadcast.cc index 0f6ba885c6c..f8555380451 100644 --- a/gcc/omp-oacc-neuter-broadcast.cc +++ b/gcc/omp-oacc-neuter-broadcast.cc @@ -56,6 +56,7 @@ /* Loop structure of the function. The entire function is described as a NULL loop. */ +/* Adapted from 'gcc/config/nvptx/nvptx.c:struct parallel'. */ struct parallel_g { @@ -183,6 +184,7 @@ omp_sese_active_worker_call (gcall *call) partitioning mode of the function as a whole. Populate MAP with head and tail blocks. We also clear the BB visited flag, which is used when finding partitions. */ +/* Adapted from 'gcc/config/nvptx/nvptx.c:nvptx_split_blocks'. */ static void omp_sese_split_blocks (bb_stmt_map_t *map) @@ -341,6 +343,7 @@ mask_name (unsigned mask) } /* Dump this parallel and all its inner parallels. */ +/* Adapted from 'gcc/config/nvptx/nvptx.c:nvptx_dump_pars'. */ static void omp_sese_dump_pars (parallel_g *par, unsigned depth) @@ -366,6 +369,7 @@ omp_sese_dump_pars (parallel_g *par, unsigned depth) /* If BLOCK contains a fork/join marker, process it to create or terminate a loop structure. Add this block to the current loop, and then walk successor blocks. */ +/* Adapted from 'gcc/config/nvptx/nvptx.c:nvptx_find_par'. */ static parallel_g * omp_sese_find_par (bb_stmt_map_t *map, parallel_g *par, basic_block block) @@ -471,6 +475,7 @@ walk_successors: to head & tail markers, discovered when splitting blocks. This speeds up the discovery. We rely on the BB visited flag having been cleared when splitting blocks. */ +/* Adapted from 'gcc/config/nvptx/nvptx.c:nvptx_discover_pars'. */ static parallel_g * omp_sese_discover_pars (bb_stmt_map_t *map) @@ -931,7 +936,9 @@ worker_single_simple (basic_block from, basic_block to, update_stmt (acc_bar); } -/* This is a copied and renamed omp-low.c:omp_build_component_ref. */ +/* Build COMPONENT_REF and set TREE_THIS_VOLATILE and TREE_READONLY on it + as appropriate. */ +/* Adapted from 'gcc/omp-low.c:omp_build_component_ref'. */ static tree oacc_build_component_ref (tree obj, tree field)