1
1

coll/base: fix ompi_coll_base_allgatherv_intra_basic_default() with MPI_IN_PLACE

Этот коммит содержится в:
Gilles Gouaillardet 2016-07-28 13:57:18 +09:00
родитель b8a1ffb87e
Коммит a0a999e63d

Просмотреть файл

@ -629,6 +629,7 @@ ompi_coll_base_allgatherv_intra_basic_default(const void *sbuf, int scount,
for (i = 0; i < rank; ++i) {
send_buf += ((ptrdiff_t)rcounts[i] * extent);
}
scount = rcounts[rank];
} else {
send_buf = (char*)sbuf;
send_type = sdtype;