Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
change the way we display leak types, skipping demangling
[simgrid.git] / teshsuite / smpi / coll-allreduce-with-leaks / coll-allreduce-with-leaks.c
index bd2f2a0a7be7632bb3ed57c88190973995b3f15d..c9b9bcb0f7f721161664c990367d4f99cde2fcf1 100644 (file)
@@ -14,9 +14,6 @@ int main(int argc, char *argv[])
 {
   int rank;
   int size;
-  int i;
-  int status;
-  int mult=1;
 
   MPI_Init(&argc, &argv);
   int maxlen = argc >= 2 ? atoi(argv[1]) : 1;
@@ -27,26 +24,15 @@ int main(int argc, char *argv[])
   MPI_Comm_size(MPI_COMM_WORLD, &size);
   MPI_Comm_set_errhandler(dup, MPI_ERRORS_RETURN);
 
-  if (maxlen > 1)
-    mult = maxlen > size ? size : maxlen;
   int* sb = xbt_new0(int, size * maxlen);
   int* rb = xbt_new0(int, size * maxlen);
 
-  for (i = 0; i < size *maxlen; ++i) {
+  for (int i = 0; i < size * maxlen; ++i) {
     sb[i] = rank*size + i;
     rb[i] = 0;
   }
 
-  printf("[%d] sndbuf=[", rank);
-  for (i = 0; i < size *mult; i++)
-    printf("%d ", sb[i]);
-  printf("]\n");
-  status = MPI_Allreduce(sb, rb, size *maxlen, MPI_INT, MPI_SUM, dup);
-
-  printf("[%d] rcvbuf=[", rank);
-  for (i =  0; i < size *mult; i++)//do not print everything
-    printf("%d ", rb[i]);
-  printf("]\n");
+  int status = MPI_Allreduce(sb, rb, size * maxlen, MPI_INT, MPI_SUM, dup);
 
   if (rank == 0 && status != MPI_SUCCESS) {
     printf("all_to_all returned %d\n", status);