From: Daniel Arndt <daniel.arndt@iwr.uni-heidelberg.de>
Date: Thu, 19 Jul 2018 17:00:34 +0000 (+0200)
Subject: Fix Utilities::MPI::compute_point_to_point_communication_pattern
X-Git-Tag: v9.1.0-rc1~908^2
X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=a90633fe959942754469fe4e85c5e394f709fd8a;p=dealii.git

Fix Utilities::MPI::compute_point_to_point_communication_pattern
---

diff --git a/source/base/mpi.cc b/source/base/mpi.cc
index 81d3b3aaf5..88ab64ce44 100644
--- a/source/base/mpi.cc
+++ b/source/base/mpi.cc
@@ -198,10 +198,10 @@ namespace Utilities
         }
 
 #  if DEAL_II_MPI_VERSION_GTE(2, 2)
-      // Get a binary vector from the `destinations`
+      // Calculate the number of messages to send to each process
       std::vector<unsigned int> dest_vector(n_procs);
       for (const auto &el : destinations)
-        dest_vector[el] = 1;
+        ++dest_vector[el];
 
       // Find how many processes will send to this one
       // by reducing with sum and then scattering the