blob: 8cf9bdbe50d86e717a267ff71ab2d60b4f6f872b (
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
/*!
@file
Adapts `boost::fusion::vector` for use with Hana.
@copyright Louis Dionne 2013-2016
Distributed under the Boost Software License, Version 1.0.
(See accompanying file LICENSE.md or copy at http://boost.org/LICENSE_1_0.txt)
*/
#ifndef BOOST_HANA_EXT_BOOST_FUSION_VECTOR_HPP
#define BOOST_HANA_EXT_BOOST_FUSION_VECTOR_HPP
#include <boost/hana/config.hpp>
#include <boost/hana/core/when.hpp>
#include <boost/hana/ext/boost/fusion/detail/common.hpp>
#include <boost/hana/fwd/at.hpp>
#include <boost/hana/fwd/core/make.hpp>
#include <boost/hana/fwd/core/tag_of.hpp>
#include <boost/hana/fwd/drop_front.hpp>
#include <boost/hana/fwd/length.hpp>
#include <boost/fusion/algorithm/transformation/pop_front.hpp>
#include <boost/fusion/container/generation/make_vector.hpp>
#include <boost/fusion/container/vector.hpp>
#include <boost/fusion/container/vector/convert.hpp>
#include <boost/fusion/support/tag_of.hpp>
#include <cstddef>
#include <type_traits>
#include <utility>
#ifdef BOOST_HANA_DOXYGEN_INVOKED
namespace boost { namespace fusion {
//! @ingroup group-ext-fusion
//! Adapter for Boost.Fusion vectors.
//!
//!
//! Modeled concepts
//! ----------------
//! A Fusion vector is a model of the `Sequence` concept, and all the
//! concepts it refines. That makes it essentially the same as a Hana
//! tuple, although the complexity of some operations might differ from
//! that of a tuple.
//!
//! @include example/ext/boost/fusion/vector.cpp
template <typename ...T>
struct vector { };
}}
#endif
BOOST_HANA_NAMESPACE_BEGIN
namespace ext { namespace boost { namespace fusion {
struct vector_tag;
}}}
template <typename T>
struct tag_of<T, when<
std::is_same<
typename ::boost::fusion::traits::tag_of<T>::type,
::boost::fusion::traits::tag_of<
::boost::fusion::vector<>
>::type
>::value
>> {
using type = ext::boost::fusion::vector_tag;
};
namespace detail {
template <>
struct is_fusion_sequence<ext::boost::fusion::vector_tag> {
static constexpr bool value = true;
};
}
//////////////////////////////////////////////////////////////////////////
// Iterable (the rest is in detail/common.hpp)
//////////////////////////////////////////////////////////////////////////
template <>
struct drop_front_impl<ext::boost::fusion::vector_tag> {
template <std::size_t n, typename Xs, std::size_t ...i>
static constexpr auto drop_front_helper(Xs&& xs, std::index_sequence<i...>) {
return hana::make<ext::boost::fusion::vector_tag>(
hana::at_c<n + i>(static_cast<Xs&&>(xs))...
);
}
template <typename Xs, typename N>
static constexpr auto apply(Xs&& xs, N const&) {
constexpr std::size_t n = N::value;
constexpr std::size_t len = decltype(hana::length(xs))::value;
return drop_front_helper<n>(static_cast<Xs&&>(xs),
std::make_index_sequence<(n < len ? len - n : 0)>{});
}
};
//////////////////////////////////////////////////////////////////////////
// Sequence
//////////////////////////////////////////////////////////////////////////
template <>
struct make_impl<ext::boost::fusion::vector_tag> {
template <typename ...Xs>
static constexpr auto apply(Xs&& ...xs) {
return ::boost::fusion::make_vector(static_cast<Xs&&>(xs)...);
}
};
BOOST_HANA_NAMESPACE_END
#endif // !BOOST_HANA_EXT_BOOST_FUSION_VECTOR_HPP
|