- new_datatype(MPI_BYTE);
- new_datatype(MPI_CHAR);
- new_datatype(MPI_INT);
- new_datatype(MPI_INT);
- new_datatype(MPI_INT8_T);
- new_datatype(MPI_INT16_T);
- new_datatype(MPI_INT32_T);
- new_datatype(MPI_INT64_T);
- new_datatype(MPI_FLOAT);
- new_datatype(MPI_FLOAT);
- new_datatype(MPI_DOUBLE);
- new_datatype(MPI_DOUBLE);
- new_datatype(MPI_C_FLOAT_COMPLEX);
- new_datatype(MPI_C_DOUBLE_COMPLEX);
- new_datatype(MPI_2INT);
- new_datatype(MPI_UINT8_T);
- new_datatype(MPI_UINT16_T);
- new_datatype(MPI_UINT32_T);
- new_datatype(MPI_UINT64_T);
- new_datatype(MPI_2FLOAT);
- new_datatype(MPI_2DOUBLE);
- new_datatype(MPI_DOUBLE);
- new_datatype(MPI_DOUBLE);
- new_datatype(MPI_INT);
- new_datatype(MPI_DATATYPE_NULL);
- new_datatype(MPI_DATATYPE_NULL);
- new_datatype(MPI_DATATYPE_NULL);
- new_datatype(MPI_DATATYPE_NULL);
+ win_lookup = xbt_dict_new_homogeneous(NULL);
+ smpi_type_c2f(MPI_BYTE);
+ smpi_type_c2f(MPI_CHAR);
+ #if defined(__alpha__) || defined(__sparc64__) || defined(__x86_64__) || defined(__ia64__)
+ smpi_type_c2f(MPI_INT);
+ smpi_type_c2f(MPI_INT);
+ #else
+ smpi_type_c2f(MPI_LONG);
+ smpi_type_c2f(MPI_LONG);
+ #endif
+ smpi_type_c2f(MPI_INT8_T);
+ smpi_type_c2f(MPI_INT16_T);
+ smpi_type_c2f(MPI_INT32_T);
+ smpi_type_c2f(MPI_INT64_T);
+ smpi_type_c2f(MPI_FLOAT);
+ smpi_type_c2f(MPI_FLOAT);
+ smpi_type_c2f(MPI_DOUBLE);
+ smpi_type_c2f(MPI_DOUBLE);
+ smpi_type_c2f(MPI_C_FLOAT_COMPLEX);
+ smpi_type_c2f(MPI_C_DOUBLE_COMPLEX);
+ #if defined(__alpha__) || defined(__sparc64__) || defined(__x86_64__) || defined(__ia64__)
+ smpi_type_c2f(MPI_2INT);
+ #else
+ smpi_type_c2f(MPI_2LONG);
+ #endif
+ smpi_type_c2f(MPI_UINT8_T);
+ smpi_type_c2f(MPI_UINT16_T);
+ smpi_type_c2f(MPI_UINT32_T);
+ smpi_type_c2f(MPI_UINT64_T);
+ smpi_type_c2f(MPI_2FLOAT);
+ smpi_type_c2f(MPI_2DOUBLE);
+ smpi_type_c2f(MPI_DOUBLE);
+ smpi_type_c2f(MPI_DOUBLE);
+ smpi_type_c2f(MPI_INT);
+ smpi_type_c2f(MPI_DATATYPE_NULL);
+ smpi_type_c2f(MPI_DATATYPE_NULL);
+ smpi_type_c2f(MPI_DATATYPE_NULL);
+ smpi_type_c2f(MPI_DATATYPE_NULL);