Skip to content

Commit 3c3dffc

Browse files
committed
PR feedback for mpif code
Signed-off-by: Howard Pritchard <[email protected]>
1 parent f326157 commit 3c3dffc

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

ompi/mpi/fortran/mpif-h/request_get_status_some_f.c

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -117,7 +117,7 @@ void ompi_request_get_status_some_f(MPI_Fint *incount, MPI_Fint *array_of_reques
117117

118118
if (MPI_SUCCESS == c_ierr) {
119119
OMPI_SINGLE_INT_2_FINT(*outcount);
120-
OMPI_ARRAY_INT_2_FINT(array_of_indices, *incount);
120+
OMPI_ARRAY_INT_2_FINT(array_of_indices, *outcount);
121121

122122
/* Increment indexes by one for fortran conventions */
123123

0 commit comments

Comments
 (0)