void ring_array_test(const communicator& comm, const T* pass_values, int n, const char* kind, int root = 0) { T* transferred_values = new T[n]; int rank = comm.rank(); int size = comm.size(); if (rank == root) { std::cout << "Passing " << kind << " array around a ring from root " << root << "..."; comm.send((rank + 1) % size, 0, pass_values, n); comm.recv((rank + size - 1) % size, 0, transferred_values, n); bool okay = std::equal(pass_values, pass_values + n, transferred_values); BOOST_CHECK(okay); if (okay) std::cout << " OK." << std::endl; } else { status stat = comm.probe(boost::mpi::any_source, 0); boost::optional<int> num_values = stat.template count<T>(); if (boost::mpi::is_mpi_datatype<T>()) BOOST_CHECK(num_values && *num_values == n); else BOOST_CHECK(!num_values || *num_values == n); comm.recv(stat.source(), 0, transferred_values, n); BOOST_CHECK(std::equal(pass_values, pass_values + n, transferred_values)); comm.send((rank + 1) % size, 0, transferred_values, n); } (comm.barrier)(); delete [] transferred_values; }