1
2 // (C) Copyright Edward Diener 2011-2015
3 // Use, modification and distribution are subject to the Boost Software License,
4 // Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at
5 // http://www.boost.org/LICENSE_1_0.txt).
6
7 #include <boost/vmd/equal.hpp>
8 #include <boost/detail/lightweight_test.hpp>
9
main()10 int main()
11 {
12
13 #if BOOST_PP_VARIADICS
14
15 #define BOOST_VMD_REGISTER_AN_ID1 (AN_ID1)
16 #define BOOST_VMD_REGISTER_AN_ID2 (AN_ID2)
17
18 #define BOOST_VMD_DETECT_AN_ID1_AN_ID1
19 #define BOOST_VMD_DETECT_AN_ID2_AN_ID2
20
21 #define AN_IDENTIFIER1 AN_ID1
22 #define AN_IDENTIFIER2 AN_ID2
23 #define AN_IDENTIFIER3 AN_ID1 // same as AN_IDENTIFIER1 = AN_ID1
24
25 #define A_NUMBER1 33
26 #define A_NUMBER2 145
27 #define A_NUMBER3 33 // same as A_NUMBER1 = 33
28
29 #define A_TUPLE1 (AN_IDENTIFIER1,A_NUMBER1)
30 #define A_TUPLE2 (AN_IDENTIFIER1,A_NUMBER2)
31 #define A_TUPLE3 (AN_IDENTIFIER3,A_NUMBER3) // same as A_TUPLE1 = (AN_ID1,33)
32
33 #define A_SEQ1 (A_NUMBER1)(A_TUPLE1)
34 #define A_SEQ2 (A_NUMBER2)(A_TUPLE2)
35 #define A_SEQ3 (A_NUMBER3)(A_TUPLE3) // same as A_SEQ1 = (33)((AN_ID1,33))
36
37 BOOST_TEST(!BOOST_VMD_EQUAL(AN_IDENTIFIER1,AN_IDENTIFIER2));
38 BOOST_TEST(BOOST_VMD_EQUAL(AN_IDENTIFIER1,AN_IDENTIFIER3));
39 BOOST_TEST(!BOOST_VMD_EQUAL(A_NUMBER1,A_NUMBER2));
40 BOOST_TEST(BOOST_VMD_EQUAL(A_NUMBER1,A_NUMBER3));
41 BOOST_TEST(!BOOST_VMD_EQUAL(A_TUPLE1,A_TUPLE2));
42 BOOST_TEST(BOOST_VMD_EQUAL(A_TUPLE1,A_TUPLE3));
43 BOOST_TEST(!BOOST_VMD_EQUAL(A_SEQ1,A_SEQ2));
44 BOOST_TEST(BOOST_VMD_EQUAL(A_SEQ1,A_SEQ3));
45
46 #define TUPLE_IS_ARRAY1 (2,(3,4))
47 #define TUPLE_IS_ARRAY2 (2,(4,5))
48 #define TUPLE_IS_ARRAY3 (2,(3,4))
49
50 #define TUPLE_IS_LIST1 (55,BOOST_PP_NIL)
51 #define TUPLE_IS_LIST2 (135,BOOST_PP_NIL)
52 #define TUPLE_IS_LIST3 (55,BOOST_PP_NIL)
53
54 #define TUPLE_IS_LIST_OR_ARRAY1 (2,(3,BOOST_PP_NIL))
55 #define TUPLE_IS_LIST_OR_ARRAY2 (2,(4,BOOST_PP_NIL))
56 #define TUPLE_IS_LIST_OR_ARRAY3 (2,(3,BOOST_PP_NIL))
57
58 BOOST_TEST(!BOOST_VMD_EQUAL(TUPLE_IS_ARRAY1,TUPLE_IS_ARRAY2));
59 BOOST_TEST(BOOST_VMD_EQUAL(TUPLE_IS_ARRAY1,TUPLE_IS_ARRAY3));
60 BOOST_TEST(!BOOST_VMD_EQUAL(TUPLE_IS_LIST1,TUPLE_IS_LIST2));
61 BOOST_TEST(BOOST_VMD_EQUAL(TUPLE_IS_LIST1,TUPLE_IS_LIST3));
62 BOOST_TEST(!BOOST_VMD_EQUAL(TUPLE_IS_LIST_OR_ARRAY1,TUPLE_IS_LIST_OR_ARRAY2));
63 BOOST_TEST(BOOST_VMD_EQUAL(TUPLE_IS_LIST_OR_ARRAY1,TUPLE_IS_LIST_OR_ARRAY3));
64
65 #define A_TUPLE_1 (3,4,"astring")
66 #define A_TUPLE_2 (3,4)
67
68 BOOST_TEST(!BOOST_VMD_EQUAL(A_TUPLE_1,A_TUPLE_2));
69
70 #else
71
72 BOOST_ERROR("No variadic macro support");
73
74 #endif
75
76 return boost::report_errors();
77
78 }
79