Make MPI_F08_status in C match the layout of type(MPI_Status) in Fortran

mpiwg-abi · Feb 25, 2024 · 58b875c · 58b875c
1 parent 2aa76cf
commit 58b875c
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/mpi.h b/mpi.h
@@ -188,7 +188,10 @@ enum {
 };
 
 typedef struct {
-  MPI_Fint mpi_val[MPI_F_STATUS_SIZE];
+  MPI_Fint MPI_SOURCE;
+  MPI_Fint MPI_TAG;
+  MPI_Fint MPI_ERROR;
+  MPI_Fint MPI_internal[5];
 } MPI_F08_status;
 
 // Error classes