X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d986e6476b81a3ea909bf5d6e86e392cc00192f1..b8df87e176f27b25534f27d7e240defa32ca35bc:/teshsuite/smpi/coll-reduce-scatter/coll-reduce-scatter.c diff --git a/teshsuite/smpi/coll-reduce-scatter/coll-reduce-scatter.c b/teshsuite/smpi/coll-reduce-scatter/coll-reduce-scatter.c index 3bf3d91930..a6cfcdf5d8 100644 --- a/teshsuite/smpi/coll-reduce-scatter/coll-reduce-scatter.c +++ b/teshsuite/smpi/coll-reduce-scatter/coll-reduce-scatter.c @@ -1,10 +1,10 @@ -/* Copyright (c) 2013-2014. The SimGrid Team. +/* Copyright (c) 2013-2019. The SimGrid Team. * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ -/* +/* * Test of reduce scatter. * Each processor contributes its rank + the index to the reduction, then receives the ith sum * Can be called with any number of processors. @@ -16,9 +16,11 @@ int main( int argc, char **argv ) { - int err = 0, toterr; - int *sendbuf, *recvbuf, *recvcounts; - int size, rank, i, sumval; + int err = 0; + int toterr; + int size; + int rank; + int i; MPI_Comm comm; MPI_Init( &argc, &argv ); @@ -26,15 +28,15 @@ int main( int argc, char **argv ) MPI_Comm_size( comm, &size ); MPI_Comm_rank( comm, &rank ); - sendbuf = (int *) malloc( size * sizeof(int) ); - for (i=0; i