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

making the allreduce and reduce_scatter tests pass as well

Просмотр исходного кода 
This commit was SVN r7532.
Этот коммит содержится в:
Edgar Gabriel 2005-09-28 15:12:05 +00:00
родитель 75419313f7
Коммит 67dd52efb1
1 изменённых файлов: 3 добавлений и 3 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

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

@ -286,7 +286,7 @@ mca_coll_basic_reduce_log_intra(void *sbuf, void *rbuf, int count,
char *free_buffer = NULL; char *free_buffer = NULL;
char *free_rbuf = NULL; char *free_rbuf = NULL;
char *pml_buffer = NULL; char *pml_buffer = NULL;
char *snd_buffer = sbuf; char *snd_buffer = NULL;
char *rcv_buffer = rbuf; char *rcv_buffer = rbuf;
char *inplace_temp = NULL; char *inplace_temp = NULL;
@ -335,9 +335,9 @@ mca_coll_basic_reduce_log_intra(void *sbuf, void *rbuf, int count,
return OMPI_ERR_OUT_OF_RESOURCE; return OMPI_ERR_OUT_OF_RESOURCE;
} }
sbuf = inplace_temp - lb; sbuf = inplace_temp - lb;
err = ompi_ddt_copy_content_same_ddt(dtype, count, rbuf, sbuf); err = ompi_ddt_copy_content_same_ddt(dtype, count, sbuf, rbuf);
} }
snd_buffer = sbuf;
if (rank != root && 0 == (vrank & 1)) { if (rank != root && 0 == (vrank & 1)) {
/* root is the only one required to provide a valid rbuf. /* root is the only one required to provide a valid rbuf.