A
lgorithmique
N
umérique
D
istribuée
Public GIT Repository
projects
/
simgrid.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Use DBL_MAX for values of type double.
[simgrid.git]
/
src
/
smpi
/
colls
/
allreduce-smp-rdb.c
diff --git
a/src/smpi/colls/allreduce-smp-rdb.c
b/src/smpi/colls/allreduce-smp-rdb.c
index
ee60379
..
b6def2e
100644
(file)
--- a/
src/smpi/colls/allreduce-smp-rdb.c
+++ b/
src/smpi/colls/allreduce-smp-rdb.c
@@
-31,7
+31,7
@@
int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count,
{
int comm_size, rank;
void *tmp_buf;
- int tag =
50
;
+ int tag =
COLL_TAG_ALLREDUCE
;
int mask, src, dst;
MPI_Status status;
int num_core = NUM_CORE;
@@
-71,7
+71,7
@@
int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count,
src = (inter_rank * num_core) + (intra_rank | mask);
if (src < comm_size) {
smpi_mpi_recv(tmp_buf, count, dtype, src, tag, comm, &status);
- s
tar_reduction
(op, tmp_buf, recv_buf, &count, &dtype);
+ s
mpi_op_apply
(op, tmp_buf, recv_buf, &count, &dtype);
}
} else {
dst = (inter_rank * num_core) + (intra_rank & (~mask));
@@
-108,7
+108,7
@@
int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count,
} else {
src = rank - num_core;
smpi_mpi_recv(tmp_buf, count, dtype, src, tag, comm, &status);
- s
tar_reduction
(op, tmp_buf, recv_buf, &count, &dtype);
+ s
mpi_op_apply
(op, tmp_buf, recv_buf, &count, &dtype);
newrank = inter_rank / 2;
}
} else {
@@
-134,7
+134,7
@@
int smpi_coll_tuned_allreduce_smp_rdb(void *send_buf, void *recv_buf, int count,
/* exchange data in rdb manner */
smpi_mpi_sendrecv(recv_buf, count, dtype, dst, tag, tmp_buf, count, dtype,
dst, tag, comm, &status);
- s
tar_reduction
(op, tmp_buf, recv_buf, &count, &dtype);
+ s
mpi_op_apply
(op, tmp_buf, recv_buf, &count, &dtype);
mask <<= 1;
}
}