blob: e23cd52116da91527755a09459d6f34e485d2011 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
// 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/at.hpp>
#include <boost/hana/fold_right.hpp>
#include <boost/hana/tuple.hpp>
namespace hana = boost::hana;
//
// Make sure that we can fold_right and take arguments by reference.
//
int main() {
// with state
{
auto xs = hana::make_tuple(1, 2, 3);
int state = 99;
int& one = hana::fold_right(xs, state, [](int& i, int&) -> int& {
return i;
});
BOOST_HANA_RUNTIME_CHECK(one == 1);
one = 10;
BOOST_HANA_RUNTIME_CHECK(hana::at_c<0>(xs) == 10);
}
// without state
{
auto xs = hana::make_tuple(1, 2, 3);
int& one = hana::fold_right(xs, [](int& i, int&) -> int& {
return i;
});
BOOST_HANA_RUNTIME_CHECK(one == 1);
one = 10;
BOOST_HANA_RUNTIME_CHECK(hana::at_c<0>(xs) == 10);
}
}
|