[Openmp-commits] [PATCH] D41656: Correct types of pointers to doacross_num_done
Jonas Hahnfeld via Phabricator via Openmp-commits
openmp-commits at lists.llvm.org
Sun Jan 7 08:55:56 PST 2018
This revision was automatically updated to reflect the committed changes.
Closed by commit rL321964: Correct types of pointers to doacross_num_done (authored by Hahnfeld, committed by ).
Changed prior to commit:
https://reviews.llvm.org/D41656?vs=128387&id=128874#toc
Repository:
rL LLVM
https://reviews.llvm.org/D41656
Files:
openmp/trunk/runtime/src/kmp_csupport.cpp
Index: openmp/trunk/runtime/src/kmp_csupport.cpp
===================================================================
--- openmp/trunk/runtime/src/kmp_csupport.cpp
+++ openmp/trunk/runtime/src/kmp_csupport.cpp
@@ -4032,7 +4032,7 @@
}
void __kmpc_doacross_fini(ident_t *loc, int gtid) {
- kmp_int64 num_done;
+ kmp_int32 num_done;
kmp_info_t *th = __kmp_threads[gtid];
kmp_team_t *team = th->th.th_team;
kmp_disp_t *pr_buf = th->th.th_dispatch;
@@ -4042,15 +4042,15 @@
KA_TRACE(20, ("__kmpc_doacross_fini() exit: serialized team %p\n", team));
return; // nothing to do
}
- num_done = KMP_TEST_THEN_INC64((kmp_int64 *)pr_buf->th_doacross_info[1]) + 1;
+ num_done = KMP_TEST_THEN_INC32((kmp_int32 *)pr_buf->th_doacross_info[1]) + 1;
if (num_done == th->th.th_team_nproc) {
// we are the last thread, need to free shared resources
int idx = pr_buf->th_doacross_buf_idx - 1;
dispatch_shared_info_t *sh_buf =
&team->t.t_disp_buffer[idx % __kmp_dispatch_num_buffers];
KMP_DEBUG_ASSERT(pr_buf->th_doacross_info[1] ==
(kmp_int64)&sh_buf->doacross_num_done);
- KMP_DEBUG_ASSERT(num_done == (kmp_int64)sh_buf->doacross_num_done);
+ KMP_DEBUG_ASSERT(num_done == sh_buf->doacross_num_done);
KMP_DEBUG_ASSERT(idx == sh_buf->doacross_buf_idx);
__kmp_thread_free(th, CCAST(kmp_uint32 *, sh_buf->doacross_flags));
sh_buf->doacross_flags = NULL;
-------------- next part --------------
A non-text attachment was scrubbed...
Name: D41656.128874.patch
Type: text/x-patch
Size: 1432 bytes
Desc: not available
URL: <http://lists.llvm.org/pipermail/openmp-commits/attachments/20180107/00ef4eed/attachment.bin>
More information about the Openmp-commits
mailing list