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

If we have to complain about some pointer problems at least complain

Просмотр исходного кода 
about the right thing.

This commit was SVN r15300.
Этот коммит содержится в:
George Bosilca 2007-07-06 16:56:04 +00:00
родитель cff1b6a71b
Коммит 245310d7a7
1 изменённых файлов: 7 добавлений и 2 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

9
ompi/datatype/dt_copy.c
Просмотреть файл

@ -163,7 +163,9 @@ int32_t ompi_ddt_copy_content_same_ddt( const ompi_datatype_t* datatype, int32_t
while( total_length > 0 ) { while( total_length > 0 ) {
if( memcpy_chunk > total_length ) memcpy_chunk = total_length; if( memcpy_chunk > total_length ) memcpy_chunk = total_length;
OMPI_DDT_SAFEGUARD_POINTER( destination, memcpy_chunk, OMPI_DDT_SAFEGUARD_POINTER( destination, memcpy_chunk,
destination, datatype, count ); (unsigned char*)destination_base, datatype, count );
OMPI_DDT_SAFEGUARD_POINTER( source, memcpy_chunk,
(unsigned char*)source_base, datatype, count );
DO_DEBUG( opal_output( 0, "copy c1. memcpy( %p, %p, %lu ) => space %lu\n", DO_DEBUG( opal_output( 0, "copy c1. memcpy( %p, %p, %lu ) => space %lu\n",
destination, source, (unsigned long)memcpy_chunk, (unsigned long)iov_len_local ); ); destination, source, (unsigned long)memcpy_chunk, (unsigned long)iov_len_local ); );
MEMCPY( destination, source, memcpy_chunk ); MEMCPY( destination, source, memcpy_chunk );
@ -175,7 +177,9 @@ int32_t ompi_ddt_copy_content_same_ddt( const ompi_datatype_t* datatype, int32_t
} else { } else {
for( pos_desc = 0; (int32_t)pos_desc < count; pos_desc++ ) { for( pos_desc = 0; (int32_t)pos_desc < count; pos_desc++ ) {
OMPI_DDT_SAFEGUARD_POINTER( destination, datatype->size, OMPI_DDT_SAFEGUARD_POINTER( destination, datatype->size,
destination, datatype, count ); (unsigned char*)destination_base, datatype, count );
OMPI_DDT_SAFEGUARD_POINTER( source, datatype->size,
(unsigned char*)source_base, datatype, count );
DO_DEBUG( opal_output( 0, "copy c2. memcpy( %p, %p, %lu ) => space %lu\n", DO_DEBUG( opal_output( 0, "copy c2. memcpy( %p, %p, %lu ) => space %lu\n",
destination, source, (unsigned long)datatype->size, destination, source, (unsigned long)datatype->size,
(unsigned long)(iov_len_local - (pos_desc * datatype->size)) ); ); (unsigned long)(iov_len_local - (pos_desc * datatype->size)) ); );
@ -261,3 +265,4 @@ int32_t ompi_ddt_copy_content_same_ddt( const ompi_datatype_t* datatype, int32_t
} }
} }
} }