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

Correctly compute the size of the datatype.

Просмотр исходного кода 
This commit was SVN r9127.
Этот коммит содержится в:
George Bosilca 2006-02-23 04:30:52 +00:00
родитель 79d25220b6
Коммит 39252b764f
1 изменённых файлов: 2 добавлений и 2 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

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

@ -48,7 +48,7 @@ int ompi_coll_tuned_reduce_intra_chain( void *sendbuf, void *recvbuf, int count,
char *accumbuf = (char*)NULL; char *accumbuf = (char*)NULL;
char *sendtmpbuf = (char*)NULL; char *sendtmpbuf = (char*)NULL;
long ext, lb; long ext, lb;
int typelng; unsigned long typelng;
int allocedaccumbuf = 0; int allocedaccumbuf = 0;
ompi_request_t* reqs[2]; ompi_request_t* reqs[2];
ompi_coll_chain_t* chain; ompi_coll_chain_t* chain;
@ -86,7 +86,7 @@ int ompi_coll_tuned_reduce_intra_chain( void *sendbuf, void *recvbuf, int count,
/* Determine number of segments and number of elements /* Determine number of segments and number of elements
sent per operation */ sent per operation */
ompi_ddt_get_extent( datatype, &lb, &ext ); ompi_ddt_get_extent( datatype, &lb, &ext );
ompi_ddt_type_size( datatype, &typelng ); ompi_ddt_get_size( datatype, &typelng );
if( segsize > typelng ) { if( segsize > typelng ) {
segcount = segsize/typelng; segcount = segsize/typelng;
num_segments = count/segcount; num_segments = count/segcount;