@@ -107,16 +107,16 @@ module mpi_f08_types
107107 ! NULL "handles" (indices)
108108 !
109109
110- type (MPI_Comm), bind(C, name= " ompi_f08_mpi_comm_null" ) OMPI_PROTECTED :: MPI_COMM_NULL;
111- type (MPI_Datatype), bind(C, name= " ompi_f08_mpi_datatype_null" ) OMPI_PROTECTED :: MPI_DATATYPE_NULL;
112- type (MPI_Errhandler), bind(C, name= " ompi_f08_mpi_errhandler_null" ) OMPI_PROTECTED :: MPI_ERRHANDLER_NULL;
113- type (MPI_Group), bind(C, name= " ompi_f08_mpi_group_null" ) OMPI_PROTECTED :: MPI_GROUP_NULL;
114- type (MPI_Info), bind(C, name= " ompi_f08_mpi_info_null" ) OMPI_PROTECTED :: MPI_INFO_NULL;
115- type (MPI_Message), bind(C, name= " ompi_f08_mpi_message_null" ) OMPI_PROTECTED :: MPI_MESSAGE_NULL;
116- type (MPI_Op), bind(C, name= " ompi_f08_mpi_op_null" ) OMPI_PROTECTED :: MPI_OP_NULL;
117- type (MPI_Request), bind(C, name= " ompi_f08_mpi_request_null" ) OMPI_PROTECTED :: MPI_REQUEST_NULL;
118- type (MPI_Win), bind(C, name= " ompi_f08_mpi_win_null" ) OMPI_PROTECTED :: MPI_WIN_NULL;
119- type (MPI_File), bind(C, name= " ompi_f08_mpi_file_null" ) OMPI_PROTECTED :: MPI_FILE_NULL;
110+ type (MPI_Comm), bind(C, name= " ompi_f08_mpi_comm_null" ) OMPI_PROTECTED :: MPI_COMM_NULL
111+ type (MPI_Datatype), bind(C, name= " ompi_f08_mpi_datatype_null" ) OMPI_PROTECTED :: MPI_DATATYPE_NULL
112+ type (MPI_Errhandler), bind(C, name= " ompi_f08_mpi_errhandler_null" ) OMPI_PROTECTED :: MPI_ERRHANDLER_NULL
113+ type (MPI_Group), bind(C, name= " ompi_f08_mpi_group_null" ) OMPI_PROTECTED :: MPI_GROUP_NULL
114+ type (MPI_Info), bind(C, name= " ompi_f08_mpi_info_null" ) OMPI_PROTECTED :: MPI_INFO_NULL
115+ type (MPI_Message), bind(C, name= " ompi_f08_mpi_message_null" ) OMPI_PROTECTED :: MPI_MESSAGE_NULL
116+ type (MPI_Op), bind(C, name= " ompi_f08_mpi_op_null" ) OMPI_PROTECTED :: MPI_OP_NULL
117+ type (MPI_Request), bind(C, name= " ompi_f08_mpi_request_null" ) OMPI_PROTECTED :: MPI_REQUEST_NULL
118+ type (MPI_Win), bind(C, name= " ompi_f08_mpi_win_null" ) OMPI_PROTECTED :: MPI_WIN_NULL
119+ type (MPI_File), bind(C, name= " ompi_f08_mpi_file_null" ) OMPI_PROTECTED :: MPI_FILE_NULL
120120
121121 !
122122 ! Pre-defined datatype bindings
0 commit comments