1
1

Update the definition of the Fortran MPI_DATATYPE_NULL.

This commit was SVN r2752.
Этот коммит содержится в:
George Bosilca 2004-09-19 03:50:30 +00:00
родитель c85f931ae5
Коммит 3482ab96d6
2 изменённых файлов: 27 добавлений и 24 удалений

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

@ -128,7 +128,7 @@
parameter (MPI_GROUP_NULL=0) parameter (MPI_GROUP_NULL=0)
parameter (MPI_COMM_NULL=2) parameter (MPI_COMM_NULL=2)
parameter (MPI_DATATYPE_NULL=-1) parameter (MPI_DATATYPE_NULL=0)
parameter (MPI_REQUEST_NULL=-1) parameter (MPI_REQUEST_NULL=-1)
parameter (MPI_OP_NULL=-1) parameter (MPI_OP_NULL=-1)
parameter (MPI_ERRHANDLER_NULL=-1) parameter (MPI_ERRHANDLER_NULL=-1)

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

@ -268,8 +268,11 @@ int ompi_ddt_init( void )
for( i = 0; i < DT_MAX_PREDEFINED; i++ ) for( i = 0; i < DT_MAX_PREDEFINED; i++ )
local_sizes[i] = basicDatatypes[i].size; local_sizes[i] = basicDatatypes[i].size;
/* The order of the data registration should be the same as the one
* in the mpif.h file. Any modification here should be reflected there !!!
*/
/* Start to populate the f2c index translation table */ /* Start to populate the f2c index translation table */
ompi_pointer_array_add( ompi_datatype_f_to_c_table, NULL ); /* why not ? */ ompi_pointer_array_add( ompi_datatype_f_to_c_table, ompi_mpi_datatype_null );
ompi_pointer_array_add( ompi_datatype_f_to_c_table, ompi_mpi_byte ); ompi_pointer_array_add( ompi_datatype_f_to_c_table, ompi_mpi_byte );
ompi_pointer_array_add( ompi_datatype_f_to_c_table, ompi_mpi_packed ); ompi_pointer_array_add( ompi_datatype_f_to_c_table, ompi_mpi_packed );
ompi_pointer_array_add( ompi_datatype_f_to_c_table, ompi_mpi_ub ); ompi_pointer_array_add( ompi_datatype_f_to_c_table, ompi_mpi_ub );