X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/7d18220729378bc55a4b8ccc298d80e03263f3f0..bace8e5a6ff160e200f799250796c5303dc487ba:/teshsuite/smpi/mpich3-test/datatype/large-count.c diff --git a/teshsuite/smpi/mpich3-test/datatype/large-count.c b/teshsuite/smpi/mpich3-test/datatype/large-count.c index 31f6a2d419..fd316d6180 100644 --- a/teshsuite/smpi/mpich3-test/datatype/large-count.c +++ b/teshsuite/smpi/mpich3-test/datatype/large-count.c @@ -24,20 +24,6 @@ } \ } while (0) -/* Abort when using unimplemented functions. Currently, it should not happen, - * since sizeof(MPI_Count) == sizeof(int), but it avoids compile errors about - * undefined functions. */ -#define err_unimpl(func) do { \ - fprintf(stderr, "ERROR: %s is not implemented\n", #func); \ - abort(); \ - } while (0) - -#define MPI_Type_size_x(a,b) err_unimpl(MPI_Type_size_x) -#define MPI_Type_get_extent_x(a,b,c) err_unimpl(MPI_Type_get_extent_x) -#define MPI_Type_get_true_extent_x(a,b,c) err_unimpl(MPI_Type_get_true_extent_x) -#define MPI_Get_elements_x(a,b,c) err_unimpl(MPI_Get_elements_x) -#define MPI_Status_set_elements_x(a,b,c) err_unimpl(MPI_Status_set_elements_x) - int main(int argc, char *argv[]) { int errs = 0; @@ -45,7 +31,7 @@ int main(int argc, char *argv[]) int size, elements, count; MPI_Aint lb, extent; MPI_Count size_x, lb_x, extent_x, elements_x; - double imx4i_true_extent; + MPI_Count imx4i_true_extent; MPI_Datatype imax_contig = MPI_DATATYPE_NULL; MPI_Datatype four_ints = MPI_DATATYPE_NULL; MPI_Datatype imx4i = MPI_DATATYPE_NULL;