ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

in scatterv we tested unfortunatly the wrong datatype for the

Просмотр исходного кода 
displacement (for both the inter and intra-communicator version). The
displacements in scatterv are given in multiples of the sendtype.
This fix should probably make to v1.0.1 as well?

This commit was SVN r8251.
Этот коммит содержится в:
Edgar Gabriel 2005-11-23 21:42:45 +00:00
родитель c6fb3217f8
Коммит 83cef7f8ac
1 изменённых файлов: 2 добавлений и 2 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

4
ompi/mca/coll/basic/coll_basic_scatterv.c
Просмотреть файл

@ -69,7 +69,7 @@ mca_coll_basic_scatterv_intra(void *sbuf, int *scounts,
/* I am the root, loop sending data. */ /* I am the root, loop sending data. */
err = ompi_ddt_get_extent(rdtype, &lb, &extent); err = ompi_ddt_get_extent(sdtype, &lb, &extent);
if (OMPI_SUCCESS != err) { if (OMPI_SUCCESS != err) {
return OMPI_ERROR; return OMPI_ERROR;
} }
@ -145,7 +145,7 @@ mca_coll_basic_scatterv_inter(void *sbuf, int *scounts,
comm, MPI_STATUS_IGNORE)); comm, MPI_STATUS_IGNORE));
} else { } else {
/* I am the root, loop sending data. */ /* I am the root, loop sending data. */
err = ompi_ddt_get_extent(rdtype, &lb, &extent); err = ompi_ddt_get_extent(sdtype, &lb, &extent);
if (OMPI_SUCCESS != err) { if (OMPI_SUCCESS != err) {
return OMPI_ERROR; return OMPI_ERROR;
} }