1
1

Match the latest changes in the datatype engine.

This commit was SVN r8967.
Этот коммит содержится в:
George Bosilca 2006-02-10 21:06:15 +00:00
родитель d56656580a
Коммит 9c1547373d
2 изменённых файлов: 4 добавлений и 6 удалений

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

@ -36,7 +36,6 @@ static const char FUNC_NAME[] = "MPI_Pack_external_size";
int MPI_Pack_external_size(char *datarep, int incount,
MPI_Datatype datatype, MPI_Aint *size)
{
int ret;
ompi_convertor_t local_convertor;
size_t length;
@ -52,8 +51,8 @@ int MPI_Pack_external_size(char *datarep, int incount,
ompi_convertor_copy_and_prepare_for_send( ompi_mpi_external32_convertor,
datatype, incount, NULL, &local_convertor );
ret = ompi_convertor_get_packed_size( &local_convertor, &length );
*size = (int)length;
ompi_convertor_get_packed_size( &local_convertor, &length );
*size = (MPI_Aint)length;
OBJ_DESTRUCT( &local_convertor );
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_OTHER, FUNC_NAME);

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

@ -35,7 +35,6 @@ static const char FUNC_NAME[] = "MPI_Pack_size";
int MPI_Pack_size(int incount, MPI_Datatype datatype, MPI_Comm comm,
int *size)
{
int ret;
ompi_convertor_t local_convertor;
size_t length;
@ -55,9 +54,9 @@ int MPI_Pack_size(int incount, MPI_Datatype datatype, MPI_Comm comm,
/* the resulting convertor will be set to the position ZERO */
ompi_convertor_copy_and_prepare_for_send( ompi_mpi_local_convertor, datatype, incount, NULL, &local_convertor );
ret = ompi_convertor_get_packed_size( &local_convertor, &length );
ompi_convertor_get_packed_size( &local_convertor, &length );
*size = (int)length;
OBJ_DESTRUCT( &local_convertor );
OMPI_ERRHANDLER_RETURN(ret, comm, MPI_ERR_UNKNOWN, FUNC_NAME);
return MPI_SUCCESS;
}