1 | /*============================================================================= |
---|
2 | Copyright (c) 2003 Joel de Guzman |
---|
3 | Copyright (c) 2004 Peder Holt |
---|
4 | |
---|
5 | Use, modification and distribution is subject to the Boost Software |
---|
6 | License, Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at |
---|
7 | http://www.boost.org/LICENSE_1_0.txt) |
---|
8 | ==============================================================================*/ |
---|
9 | #if !defined(FUSION_ALGORITHM_INSERT_HPP) |
---|
10 | #define FUSION_ALGORITHM_INSERT_HPP |
---|
11 | |
---|
12 | #include <boost/spirit/fusion/sequence/single_view.hpp> |
---|
13 | #include <boost/spirit/fusion/sequence/joint_view.hpp> |
---|
14 | #include <boost/spirit/fusion/sequence/range.hpp> |
---|
15 | #include <boost/spirit/fusion/sequence/begin.hpp> |
---|
16 | #include <boost/spirit/fusion/sequence/end.hpp> |
---|
17 | |
---|
18 | namespace boost { namespace fusion |
---|
19 | { |
---|
20 | namespace meta |
---|
21 | { |
---|
22 | template <typename Sequence, typename Position, typename T> |
---|
23 | struct insert |
---|
24 | { |
---|
25 | typedef typename meta::begin<Sequence>::type first_type; |
---|
26 | typedef typename meta::end<Sequence>::type last_type; |
---|
27 | |
---|
28 | typedef const single_view<T> insert_type; |
---|
29 | typedef range<first_type, Position> left_type; |
---|
30 | typedef range<Position, last_type> right_type; |
---|
31 | typedef joint_view<left_type, insert_type, true, true> left_insert_type; |
---|
32 | typedef joint_view<left_insert_type, right_type, true, true> type; |
---|
33 | }; |
---|
34 | } |
---|
35 | |
---|
36 | namespace function |
---|
37 | { |
---|
38 | struct insert |
---|
39 | { |
---|
40 | template <typename Sequence, typename Position, typename T> |
---|
41 | struct apply : meta::insert<Sequence, Position, T> {}; |
---|
42 | |
---|
43 | template <typename Sequence, typename Position, typename T> |
---|
44 | inline typename apply<Sequence const, Position, T>::type |
---|
45 | operator()(Sequence const& seq, Position const& pos, T const& x) const |
---|
46 | { |
---|
47 | typedef apply<Sequence const, Position, T> meta; |
---|
48 | typedef typename meta::left_type left_type; |
---|
49 | typedef typename meta::right_type right_type; |
---|
50 | typedef typename meta::left_insert_type left_insert_type; |
---|
51 | typedef typename meta::insert_type insert_type; |
---|
52 | typedef typename meta::type result; |
---|
53 | |
---|
54 | left_type left(fusion::begin(seq), pos); |
---|
55 | right_type right(pos, fusion::end(seq)); |
---|
56 | insert_type ins(x); |
---|
57 | left_insert_type left_insert(left, ins); |
---|
58 | return result(left_insert, right); |
---|
59 | } |
---|
60 | |
---|
61 | template <typename Sequence, typename Position, typename T> |
---|
62 | inline typename apply<Sequence, Position, T>::type |
---|
63 | operator()(Sequence& seq, Position const& pos, T const& x) const |
---|
64 | { |
---|
65 | typedef apply<Sequence, Position, T> meta_type; |
---|
66 | typedef typename meta_type::left_type left_type; |
---|
67 | typedef typename meta_type::right_type right_type; |
---|
68 | typedef typename meta_type::left_insert_type left_insert_type; |
---|
69 | typedef typename meta_type::insert_type insert_type; |
---|
70 | typedef typename meta_type::type result; |
---|
71 | |
---|
72 | left_type left(fusion::begin(seq), pos); |
---|
73 | right_type right(pos, fusion::end(seq)); |
---|
74 | insert_type ins(x); |
---|
75 | left_insert_type left_insert(left, ins); |
---|
76 | return result(left_insert, right); |
---|
77 | } |
---|
78 | }; |
---|
79 | } |
---|
80 | |
---|
81 | function::insert const insert = function::insert(); |
---|
82 | }} |
---|
83 | |
---|
84 | #endif |
---|
85 | |
---|