Pass OMPI_DISP_ARRAY_NULL to datatype_set_args

devreal · devreal · commit fa8591c73726 · 2025-10-30T14:41:34.000-04:00
Signed-off-by: Joseph Schuchart &lt;joseph.schuchart@stonybrook.edu&gt;
diff --git a/ompi/mpi/c/type_contiguous.c.in b/ompi/mpi/c/type_contiguous.c.in
@@ -62,7 +62,7 @@ PROTOTYPE ERROR_CLASS type_contiguous(COUNT count,
         ompi_datatype_set_args( *newtype,
                                 (sizeof(count) == sizeof(size_t)) ? 0 : 1,
                                 (sizeof(count) == sizeof(size_t)) ? 1 : 0,
-                                a_i, 0, OMPI_COUNT_ARRAY_NULL, 1, &oldtype, MPI_COMBINER_CONTIGUOUS );
+                                a_i, 0, OMPI_DISP_ARRAY_NULL, 1, &oldtype, MPI_COMBINER_CONTIGUOUS );
     }
 
     OMPI_ERRHANDLER_NOHANDLE_RETURN(rc, rc, FUNC_NAME );

Original file line number	Diff line number	Diff line change
`@@ -62,7 +62,7 @@ PROTOTYPE ERROR_CLASS type_contiguous(COUNT count,`
`62`	`62`	`ompi_datatype_set_args( *newtype,`
`63`	`63`	`(sizeof(count) == sizeof(size_t)) ? 0 : 1,`
`64`	`64`	`(sizeof(count) == sizeof(size_t)) ? 1 : 0,`
`65`		`- a_i, 0, OMPI_COUNT_ARRAY_NULL, 1, &oldtype, MPI_COMBINER_CONTIGUOUS );`
	`65`	`+ a_i, 0, OMPI_DISP_ARRAY_NULL, 1, &oldtype, MPI_COMBINER_CONTIGUOUS );`
`66`	`66`	`}`
`67`	`67`
`68`	`68`	`OMPI_ERRHANDLER_NOHANDLE_RETURN(rc, rc, FUNC_NAME );`