Преглед на файлове

mpi/examples: check the return value of starpu_init().

Cyril Roelandt преди 13 години
родител
ревизия
a2f330c273

+ 3 - 1
mpi/examples/cholesky/mpi_cholesky.c

@@ -195,7 +195,9 @@ int main(int argc, char **argv)
 	conf.sched_policy_name = "heft";
 	conf.calibrate = 1;
 
-	starpu_init(&conf);
+	int ret = starpu_init(&conf);
+	STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
+
 	starpu_mpi_initialize_extended(&rank, &nodes);
 	starpu_helper_cublas_init();
 

+ 2 - 1
mpi/examples/cholesky/mpi_cholesky_distributed.c

@@ -195,7 +195,8 @@ int main(int argc, char **argv)
 	conf.sched_policy_name = "heft";
 	conf.calibrate = 1;
 
-	starpu_init(&conf);
+	int ret = starpu_init(&conf);
+	STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
 	starpu_mpi_initialize_extended(&rank, &nodes);
 	starpu_helper_cublas_init();
 

+ 2 - 1
mpi/examples/mpi_lu/plu_example.c

@@ -421,7 +421,8 @@ int main(int argc, char **argv)
 
 	parse_args(rank, argc, argv);
 
-	starpu_init(NULL);
+	int ret = starpu_init(NULL);
+	STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
 
 	/* We disable sequential consistency in this example */
 	starpu_data_set_default_sequential_consistency_flag(0);

+ 2 - 1
mpi/examples/reduction/mpi_reduction.c

@@ -62,7 +62,8 @@ int main(int argc, char **argv)
 
 	int nb_elements, step;
 
-	starpu_init(NULL);
+	int ret = starpu_init(NULL);
+	STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
 	starpu_mpi_initialize_extended(&my_rank, &size);
 
 	nb_elements = size*8000;

+ 2 - 1
mpi/examples/scatter_gather/mpi_scatter_gather.c

@@ -67,7 +67,8 @@ int main(int argc, char **argv)
 	unsigned size = nblocks*block_size;
 	unsigned ld = size / nblocks;
 
-	starpu_init(NULL);
+	int ret = starpu_init(NULL);
+	STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
 	starpu_mpi_initialize_extended(&rank, &nodes);
 
 	if (rank == 0)

+ 2 - 1
mpi/examples/stencil/stencil5.c

@@ -76,7 +76,8 @@ int main(int argc, char **argv)
         unsigned matrix[X][Y];
         starpu_data_handle_t data_handles[X][Y];
 
-	starpu_init(NULL);
+	int ret = starpu_init(NULL);
+	STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
 	starpu_mpi_initialize_extended(&my_rank, &size);
         parse_args(argc, argv);