From: Augustin Degomme <degomme@idpann.imag.fr>
Date: Tue, 24 Sep 2013 12:36:34 +0000 (+0200)
Subject: test leak --
X-Git-Tag: v3_9_90~98
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/a81843f57af4c4d5b2bebd98d6a32a503f6d467d?hp=598f7595b57d24ae8120b2ccaa8a0690582b4b82

test leak --
---

diff --git a/teshsuite/smpi/scatter.c b/teshsuite/smpi/scatter.c
index e4a63037e5..50cec08553 100644
--- a/teshsuite/smpi/scatter.c
+++ b/teshsuite/smpi/scatter.c
@@ -87,6 +87,9 @@ static int small_test(int rank, int size)
   retval =
       MPI_Scatter(sndbuf, sendcount, MPI_DOUBLE, &rcvd, recvcount,
                   MPI_DOUBLE, root, MPI_COMM_WORLD);
+  if (root == rank) {
+    free(sndbuf);
+    }
   if (retval != MPI_SUCCESS) {
     fprintf(stderr, "(%s:%d) MPI_Scatter() returned retval=%d\n", __FILE__,
             __LINE__, retval);