Free communicators.

diff --git a/teshsuite/smpi/topo-cart-sub/topo-cart-sub.c b/teshsuite/smpi/topo-cart-sub/topo-cart-sub.c
index 6521ab0..5acc708 100644 (file)
--- a/teshsuite/smpi/topo-cart-sub/topo-cart-sub.c
+++ b/teshsuite/smpi/topo-cart-sub/topo-cart-sub.c
@@ -115,6 +115,9 @@ int main(int argc, char** argv)
     printf("\n");
   }
   printf("-------------------\n");
     printf("\n");
   }
   printf("-------------------\n");

+
+  MPI_Comm_free(&lineComm);
+  MPI_Comm_free(&gridComm);

   free(A);
   MPI_Barrier(MPI_COMM_WORLD);
   MPI_Finalize();
   free(A);
   MPI_Barrier(MPI_COMM_WORLD);
   MPI_Finalize();