1 /*=============================================================================
2 Copyright (c) 2001-2007 Joel de Guzman
3 Copyright (c) 2005-2007 Dan Marsden
4
5 Distributed under the Boost Software License, Version 1.0. (See accompanying
6 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
7 ==============================================================================*/
8 #include <boost/detail/lightweight_test.hpp>
9 #include <boost/fusion/adapted/struct/adapt_assoc_struct.hpp>
10 #include <boost/fusion/sequence/intrinsic/at.hpp>
11 #include <boost/fusion/sequence/intrinsic/size.hpp>
12 #include <boost/fusion/sequence/intrinsic/empty.hpp>
13 #include <boost/fusion/sequence/intrinsic/front.hpp>
14 #include <boost/fusion/sequence/intrinsic/back.hpp>
15 #include <boost/fusion/sequence/intrinsic/has_key.hpp>
16 #include <boost/fusion/sequence/intrinsic/at_key.hpp>
17 #include <boost/fusion/sequence/intrinsic/value_at.hpp>
18 #include <boost/fusion/sequence/intrinsic/value_at_key.hpp>
19 #include <boost/fusion/sequence/io/out.hpp>
20 #include <boost/fusion/container/vector/vector.hpp>
21 #include <boost/fusion/container/list/list.hpp>
22 #include <boost/fusion/container/generation/make_vector.hpp>
23 #include <boost/fusion/container/vector/convert.hpp>
24 #include <boost/fusion/sequence/comparison/equal_to.hpp>
25 #include <boost/fusion/sequence/comparison/not_equal_to.hpp>
26 #include <boost/fusion/sequence/comparison/less.hpp>
27 #include <boost/fusion/sequence/comparison/less_equal.hpp>
28 #include <boost/fusion/sequence/comparison/greater.hpp>
29 #include <boost/fusion/sequence/comparison/greater_equal.hpp>
30 #include <boost/fusion/mpl.hpp>
31 #include <boost/fusion/support/is_view.hpp>
32 #include <boost/mpl/front.hpp>
33 #include <boost/mpl/back.hpp>
34 #include <boost/mpl/is_sequence.hpp>
35 #include <boost/mpl/assert.hpp>
36 #include <boost/mpl/not.hpp>
37 #include <boost/type_traits/is_same.hpp>
38 #include <iostream>
39 #include <string>
40
41 namespace ns
42 {
43 struct x_member;
44 struct y_member;
45 struct z_member;
46 struct non_member;
47
48 struct point
49 {
50 int x;
51 int y;
52 int z;
53 };
54 }
55
56 #if BOOST_PP_VARIADICS
57 BOOST_FUSION_ADAPT_ASSOC_STRUCT(
58 ns::point,
59 (x, ns::x_member)
60 (auto, y, ns::y_member)
61 (int, z, ns::z_member)
62 )
63
64 #else // BOOST_PP_VARIADICS
65 BOOST_FUSION_ADAPT_ASSOC_STRUCT(
66 ns::point,
67 (auto, x, ns::x_member)
68 (auto, y, ns::y_member)
69 (int, z, ns::z_member)
70 )
71
72 #endif
73
74 struct empty_struct {};
75 BOOST_FUSION_ADAPT_ASSOC_STRUCT(empty_struct,)
76
77 int
main()78 main()
79 {
80 using namespace boost::fusion;
81 using namespace boost;
82
83 std::cout << tuple_open('[');
84 std::cout << tuple_close(']');
85 std::cout << tuple_delimiter(", ");
86
87 {
88 BOOST_MPL_ASSERT_NOT((traits::is_view<ns::point>));
89 BOOST_STATIC_ASSERT(!traits::is_view<ns::point>::value);
90 ns::point p = {123, 456, 789};
91
92 std::cout << at_c<0>(p) << std::endl;
93 std::cout << at_c<1>(p) << std::endl;
94 std::cout << at_c<2>(p) << std::endl;
95 std::cout << p << std::endl;
96 BOOST_TEST(p == make_vector(123, 456, 789));
97
98 at_c<0>(p) = 6;
99 at_c<1>(p) = 9;
100 at_c<2>(p) = 12;
101 BOOST_TEST(p == make_vector(6, 9, 12));
102
103 BOOST_STATIC_ASSERT(boost::fusion::result_of::size<ns::point>::value == 3);
104 BOOST_STATIC_ASSERT(!boost::fusion::result_of::empty<ns::point>::value);
105
106 BOOST_TEST(front(p) == 6);
107 BOOST_TEST(back(p) == 12);
108 }
109
110 {
111 fusion::vector<int, float, int> v1(4, 2.f, 2);
112 ns::point v2 = {5, 3, 3};
113 fusion::vector<long, double, int> v3(5, 4., 4);
114 BOOST_TEST(v1 < v2);
115 BOOST_TEST(v1 <= v2);
116 BOOST_TEST(v2 > v1);
117 BOOST_TEST(v2 >= v1);
118 BOOST_TEST(v2 < v3);
119 BOOST_TEST(v2 <= v3);
120 BOOST_TEST(v3 > v2);
121 BOOST_TEST(v3 >= v2);
122 }
123
124 {
125 // conversion from ns::point to vector
126 ns::point p = {5, 3, 3};
127 fusion::vector<int, long, int> v(p);
128 v = p;
129 }
130
131 {
132 // conversion from ns::point to list
133 ns::point p = {5, 3, 3};
134 fusion::list<int, long, int> l(p);
135 l = p;
136 }
137
138 {
139 // assoc stuff
140 BOOST_MPL_ASSERT((boost::fusion::result_of::has_key<ns::point, ns::x_member>));
141 BOOST_MPL_ASSERT((boost::fusion::result_of::has_key<ns::point, ns::y_member>));
142 BOOST_MPL_ASSERT((boost::fusion::result_of::has_key<ns::point, ns::z_member>));
143 BOOST_MPL_ASSERT((mpl::not_<boost::fusion::result_of::has_key<ns::point, ns::non_member> >));
144
145 BOOST_MPL_ASSERT((boost::is_same<boost::fusion::result_of::value_at_key<ns::point, ns::x_member>::type, int>));
146 BOOST_MPL_ASSERT((boost::is_same<boost::fusion::result_of::value_at_key<ns::point, ns::y_member>::type, int>));
147 BOOST_MPL_ASSERT((boost::is_same<boost::fusion::result_of::value_at_key<ns::point, ns::z_member>::type, int>));
148
149 ns::point p = {5, 3, 9};
150
151 BOOST_TEST(at_key<ns::x_member>(p) == 5);
152 BOOST_TEST(at_key<ns::y_member>(p) == 3);
153 BOOST_TEST(at_key<ns::z_member>(p) == 9);
154 }
155
156 {
157 BOOST_MPL_ASSERT((mpl::is_sequence<ns::point>));
158 BOOST_MPL_ASSERT((boost::is_same<
159 boost::fusion::result_of::value_at_c<ns::point,0>::type
160 , mpl::front<ns::point>::type>));
161 BOOST_MPL_ASSERT((boost::is_same<
162 boost::fusion::result_of::value_at_c<ns::point,2>::type
163 , mpl::back<ns::point>::type>));
164 }
165
166 return boost::report_errors();
167 }
168
169