Set the communicator size before using it.
This commit was SVN r14158.
Этот коммит содержится в:
родитель
852d6b0b68
Коммит
b540545fa7
@ -323,6 +323,9 @@ int ompi_coll_tuned_reduce_intra_dec_fixed( void *sendbuf, void *recvbuf,
|
||||
const double a4 = 0.0033 / 1024.0; /* [1/B] */
|
||||
const double b4 = 1.6761;
|
||||
|
||||
communicator_size = ompi_comm_size(comm);
|
||||
rank = ompi_comm_rank(comm);
|
||||
|
||||
/**
|
||||
* If the operation is non commutative we currently have choice of linear
|
||||
* or in-order binary tree algorithm.
|
||||
@ -334,9 +337,6 @@ int ompi_coll_tuned_reduce_intra_dec_fixed( void *sendbuf, void *recvbuf,
|
||||
return ompi_coll_tuned_reduce_intra_in_order_binary (sendbuf, recvbuf, count, datatype, op, root, comm, 0);
|
||||
}
|
||||
|
||||
communicator_size = ompi_comm_size(comm);
|
||||
rank = ompi_comm_rank(comm);
|
||||
|
||||
/* need data size for decision function */
|
||||
ompi_ddt_type_size(datatype, &dsize);
|
||||
message_size = dsize * count; /* needed for decision */
|
||||
|
Загрузка…
x
Ссылка в новой задаче
Block a user