X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/1d18e615eaa617d3354bc22dfbe711d34be9f902..954676b700e711f38ec4d286d33d5427d3f4ca46:/src/smpi/colls/allgather-rhv.c diff --git a/src/smpi/colls/allgather-rhv.c b/src/smpi/colls/allgather-rhv.c index c3db821070..c2e0cb43ff 100644 --- a/src/smpi/colls/allgather-rhv.c +++ b/src/smpi/colls/allgather-rhv.c @@ -1,3 +1,9 @@ +/* Copyright (c) 2013-2014. 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. */ + #include "colls_private.h" // now only work with power of two processes @@ -15,12 +21,16 @@ smpi_coll_tuned_allgather_rhv(void *sbuf, int send_count, int i, dst, send_base_offset, recv_base_offset, send_chunk, recv_chunk, send_offset, recv_offset; int rank, num_procs; - int tag = 50; + int tag = COLL_TAG_ALLGATHER; int mask; int curr_count; // get size of the communicator, followed by rank num_procs = smpi_comm_size(comm); + + if((num_procs&(num_procs-1))) + THROWF(arg_error,0, "allgather rhv algorithm can't be used with non power of two number of processes ! "); + rank = smpi_comm_rank(comm); // get size of single element's type for send buffer and recv buffer