From 483eb2f56657e8e7f419ab1a4fab8dce9ade8609 Mon Sep 17 00:00:00 2001
From: Daniel Baumann <daniel.baumann@progress-linux.org>
Date: Sat, 27 Apr 2024 20:24:20 +0200
Subject: Adding upstream version 14.2.21.

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
---
 .../libs/hana/test/tuple/assign.convert_copy.cpp   | 59 ++++++++++++++++++++++
 1 file changed, 59 insertions(+)
 create mode 100644 src/boost/libs/hana/test/tuple/assign.convert_copy.cpp

(limited to 'src/boost/libs/hana/test/tuple/assign.convert_copy.cpp')

diff --git a/src/boost/libs/hana/test/tuple/assign.convert_copy.cpp b/src/boost/libs/hana/test/tuple/assign.convert_copy.cpp
new file mode 100644
index 00000000..b4debb7a
--- /dev/null
+++ b/src/boost/libs/hana/test/tuple/assign.convert_copy.cpp
@@ -0,0 +1,59 @@
+// Copyright Louis Dionne 2013-2017
+// Distributed under the Boost Software License, Version 1.0.
+// (See accompanying file LICENSE.md or copy at http://boost.org/LICENSE_1_0.txt)
+
+#include <boost/hana/assert.hpp>
+#include <boost/hana/tuple.hpp>
+namespace hana = boost::hana;
+
+
+struct B {
+    int id_;
+    explicit B(int i = 0) : id_(i) { }
+};
+
+struct D : B {
+    explicit D(int i = 0) : B(i) { }
+};
+
+int main() {
+    {
+        using T0 = hana::tuple<double>;
+        using T1 = hana::tuple<int>;
+        T0 t0(2.5);
+        T1 t1;
+        t1 = t0;
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<0>(t1) == 2);
+    }
+    {
+        using T0 = hana::tuple<double, char>;
+        using T1 = hana::tuple<int, int>;
+        T0 t0(2.5, 'a');
+        T1 t1;
+        t1 = t0;
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<0>(t1) == 2);
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<1>(t1) == int('a'));
+    }
+    {
+        using T0 = hana::tuple<double, char, D>;
+        using T1 = hana::tuple<int, int, B>;
+        T0 t0(2.5, 'a', D(3));
+        T1 t1;
+        t1 = t0;
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<0>(t1) == 2);
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<1>(t1) == int('a'));
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<2>(t1).id_ == 3);
+    }
+    {
+        D d(3);
+        D d2(2);
+        using T0 = hana::tuple<double, char, D&>;
+        using T1 = hana::tuple<int, int, B&>;
+        T0 t0(2.5, 'a', d2);
+        T1 t1(1.5, 'b', d);
+        t1 = t0;
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<0>(t1) == 2);
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<1>(t1) == int('a'));
+        BOOST_HANA_RUNTIME_CHECK(hana::at_c<2>(t1).id_ == 2);
+    }
+}
-- 
cgit v1.2.3