Chris@16
|
1 /*=============================================================================
|
Chris@16
|
2 Copyright (c) 2001-2011 Joel de Guzman
|
Chris@16
|
3 Copyright (c) 2005-2006 Dan Marsden
|
Chris@16
|
4
|
Chris@16
|
5 Distributed under the Boost Software License, Version 1.0. (See accompanying
|
Chris@16
|
6 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
7 ==============================================================================*/
|
Chris@16
|
8 #if !defined(BOOST_FUSION_VALUE_AT_IMPL_20061101_0745)
|
Chris@16
|
9 #define BOOST_FUSION_VALUE_AT_IMPL_20061101_0745
|
Chris@16
|
10
|
Chris@101
|
11 #include <boost/fusion/support/config.hpp>
|
Chris@16
|
12 #include <boost/mpl/apply.hpp>
|
Chris@16
|
13 #include <boost/fusion/view/transform_view/detail/apply_transform_result.hpp>
|
Chris@16
|
14 #include <boost/fusion/sequence/intrinsic/value_at.hpp>
|
Chris@16
|
15
|
Chris@16
|
16 namespace boost { namespace fusion {
|
Chris@16
|
17 struct transform_view_tag;
|
Chris@16
|
18 struct transform_view2_tag;
|
Chris@16
|
19
|
Chris@16
|
20 namespace extension
|
Chris@16
|
21 {
|
Chris@16
|
22 template<typename Tag>
|
Chris@16
|
23 struct value_at_impl;
|
Chris@16
|
24
|
Chris@16
|
25 template<>
|
Chris@16
|
26 struct value_at_impl<transform_view_tag>
|
Chris@16
|
27 {
|
Chris@16
|
28 template<typename Seq, typename N>
|
Chris@16
|
29 struct apply
|
Chris@16
|
30 {
|
Chris@16
|
31 typedef typename Seq::transform_type F;
|
Chris@16
|
32 typedef detail::apply_transform_result<F> transform_type;
|
Chris@16
|
33 typedef typename boost::fusion::result_of::value_at<typename Seq::sequence_type, N>::type value_type;
|
Chris@16
|
34 typedef typename mpl::apply<transform_type, value_type>::type type;
|
Chris@16
|
35 };
|
Chris@16
|
36 };
|
Chris@16
|
37
|
Chris@16
|
38 template<>
|
Chris@16
|
39 struct value_at_impl<transform_view2_tag>
|
Chris@16
|
40 {
|
Chris@16
|
41 template<typename Seq, typename N>
|
Chris@16
|
42 struct apply
|
Chris@16
|
43 {
|
Chris@16
|
44 typedef typename Seq::transform_type F;
|
Chris@16
|
45 typedef detail::apply_transform_result<F> transform_type;
|
Chris@16
|
46 typedef typename boost::fusion::result_of::value_at<typename Seq::sequence1_type, N>::type value1_type;
|
Chris@16
|
47 typedef typename boost::fusion::result_of::value_at<typename Seq::sequence2_type, N>::type value2_type;
|
Chris@16
|
48 typedef typename mpl::apply<transform_type, value1_type, value2_type>::type type;
|
Chris@16
|
49 };
|
Chris@16
|
50 };
|
Chris@16
|
51 }
|
Chris@16
|
52 }}
|
Chris@16
|
53
|
Chris@16
|
54 #endif
|