From: Wolfgang Bangerth <bangerth@colostate.edu>
Date: Fri, 22 Sep 2023 22:27:21 +0000 (-0600)
Subject: Add a test.
X-Git-Tag: relicensing~472^2
X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=17acec74dc7255bec57672447d1155af6b1cea4d;p=dealii.git

Add a test.
---

diff --git a/tests/mpi/constraints_crash_03.cc b/tests/mpi/constraints_crash_03.cc
new file mode 100644
index 0000000000..f4d14c3990
--- /dev/null
+++ b/tests/mpi/constraints_crash_03.cc
@@ -0,0 +1,65 @@
+// ---------------------------------------------------------------------
+//
+// Copyright (C) 2013 - 2018 by the deal.II authors
+//
+// This file is part of the deal.II library.
+//
+// The deal.II library is free software; you can use it, redistribute
+// it, and/or modify it under the terms of the GNU Lesser General
+// Public License as published by the Free Software Foundation; either
+// version 2.1 of the License, or (at your option) any later version.
+// The full text of the license can be found in the file LICENSE.md at
+// the top level directory of deal.II.
+//
+// ---------------------------------------------------------------------
+
+
+
+// Like the _02 test, but this time because
+// AffineConstraints<double>::distribute() crashes because the copy
+// constructor forgot to copy members.
+
+
+#include <deal.II/dofs/dof_tools.h>
+
+#include <deal.II/lac/la_parallel_block_vector.h>
+#include <deal.II/lac/la_parallel_vector.h>
+
+#include "../tests.h"
+
+
+
+void
+test()
+{
+  unsigned int myid    = Utilities::MPI::this_mpi_process(MPI_COMM_WORLD);
+  unsigned int numproc = Utilities::MPI::n_mpi_processes(MPI_COMM_WORLD);
+
+  IndexSet owned(numproc);
+  owned.add_range(myid, myid + 1);
+  IndexSet relevant = complete_index_set(numproc);
+
+
+  AffineConstraints<double> cm(owned, relevant);
+  cm.add_line(0);
+  cm.close();
+
+  AffineConstraints<double> cm2(cm);
+
+  LinearAlgebra::distributed::Vector<double> x(owned, relevant, MPI_COMM_WORLD);
+
+  cm.distribute(x);  // this works
+  cm2.distribute(x); // this used to fail
+  deallog << "OK" << std::endl;
+}
+
+
+int
+main(int argc, char *argv[])
+{
+  Utilities::MPI::MPI_InitFinalize mpi_initialization(argc, argv, 1);
+  MPILogInitAll                    log;
+
+  test();
+  return 0;
+}
diff --git a/tests/mpi/constraints_crash_03.mpirun=2.output b/tests/mpi/constraints_crash_03.mpirun=2.output
new file mode 100644
index 0000000000..52103938b0
--- /dev/null
+++ b/tests/mpi/constraints_crash_03.mpirun=2.output
@@ -0,0 +1,5 @@
+
+DEAL:0::OK
+
+DEAL:1::OK
+