Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Add check for error.
authorArnaud Giersch <arnaud.giersch@iut-bm.univ-fcomte.fr>
Fri, 9 May 2014 11:11:38 +0000 (13:11 +0200)
committerArnaud Giersch <arnaud.giersch@iut-bm.univ-fcomte.fr>
Mon, 12 May 2014 08:39:53 +0000 (10:39 +0200)
src/smpi/colls/gather-ompi.c

index 06a9488..fdaa1d7 100644 (file)
@@ -319,6 +319,7 @@ smpi_coll_tuned_gather_ompi_linear_sync(void *sbuf, int scount,
         
         /* wait all second segments to complete */
         ret = smpi_mpi_waitall(size, reqs, MPI_STATUSES_IGNORE);
+        if (ret != MPI_SUCCESS) { line = __LINE__; goto error_hndl; }
 
         free(reqs);
     }