1 /*=============================================================================
2 Copyright (c) 2001-2007 Joel de Guzman
3
4 Distributed under the Boost Software License, Version 1.0. (See accompanying
5 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
6 ==============================================================================*/
7
8 #include <string>
9 #include <boost/detail/lightweight_test.hpp>
10 #include <boost/phoenix/core.hpp>
11 #include <boost/phoenix/operator.hpp>
12
13 namespace phoenix = boost::phoenix;
14
15 int
main()16 main()
17 {
18 using phoenix::ref;
19 using phoenix::val;
20 using phoenix::arg_names::arg1;
21 using phoenix::arg_names::arg2;
22 using std::string;
23 { // From Phoenix 1.1 binary tests
24
25 int i2 = 2, i3 = 3, i = 5;
26 const char* world = " world";
27
28
29 #if !(defined(BOOST_MSVC) && (BOOST_MSVC >= 1900))
30 BOOST_TEST((ref(i) = ref(i))() == 5);
31 #endif
32 BOOST_TEST((ref(i) = 3)() == 3);
33 BOOST_TEST(i == 3);
34 i = 5;
35 int x, y, z;
36 (ref(x) = ref(y) = ref(z) = 10)();
37 BOOST_TEST(x == 10 && y == 10 && z == 10);
38 BOOST_TEST((val(world)[3])() == world[3]);
39
40 BOOST_TEST((ref(i) += 5)() == 10);
41 BOOST_TEST((ref(i) -= 5)() == 5);
42 BOOST_TEST((ref(i) *= 5)() == 25);
43 BOOST_TEST((ref(i) /= 5)() == 5);
44 BOOST_TEST((ref(i) %= 2)() == 1);
45
46 BOOST_TEST((ref(i) <<= 3)() == 8);
47 BOOST_TEST((ref(i) >>= 1)() == 4);
48 BOOST_TEST((ref(i) |= 0xFF)() == 0xFF);
49 BOOST_TEST((ref(i) &= 0xF0)() == 0xF0);
50 BOOST_TEST((ref(i) ^= 0xFFFFFFFF)() == int(0xFFFFFF0F));
51
52 BOOST_TEST((val(5) == val(5))());
53 BOOST_TEST((val(5) == 5)());
54
55 BOOST_TEST((arg1 + arg2 )(i2, i3) == i2 + i3 );
56 BOOST_TEST((arg1 - arg2)(i2, i3) == i2 - i3);
57 BOOST_TEST((arg1 * arg2)(i2, i3) == i2 * i3);
58 BOOST_TEST((arg1 / arg2)(i2, i3) == i2 / i3);
59 BOOST_TEST((arg1 % arg2)(i2, i3) == i2 % i3);
60 BOOST_TEST((arg1 & arg2)(i2, i3) == (i2 & i3));
61 BOOST_TEST((arg1 | arg2)(i2, i3) == (i2 | i3));
62 BOOST_TEST((arg1 ^ arg2)(i2, i3) == (i2 ^ i3));
63 BOOST_TEST((arg1 << arg2)(i2, i3) == i2 << i3);
64 BOOST_TEST((arg1 >> arg2)(i2, i3) == i2 >> i3);
65
66 BOOST_TEST((val(5) != val(6))());
67 BOOST_TEST((val(5) < val(6))());
68 BOOST_TEST(!(val(5) > val(6))());
69 BOOST_TEST((val(5) < val(6))());
70 BOOST_TEST((val(5) <= val(6))());
71 BOOST_TEST((val(5) <= val(5))());
72 BOOST_TEST((val(7) >= val(6))());
73 BOOST_TEST((val(7) >= val(7))());
74
75 BOOST_TEST((val(false) && val(false))() == false);
76 BOOST_TEST((val(true) && val(false))() == false);
77 BOOST_TEST((val(false) && val(true))() == false);
78 BOOST_TEST((val(true) && val(true))() == true);
79
80 BOOST_TEST((val(false) || val(false))() == false);
81 BOOST_TEST((val(true) || val(false))() == true);
82 BOOST_TEST((val(false) || val(true))() == true);
83 BOOST_TEST((val(true) || val(true))() == true);
84 }
85
86 { // From Phoenix 1.1 mixed_binary tests
87
88 int i1 = 1, i2 = 2, i50 = 50, i100 = 100;
89 double d2_5 = 2.5;
90 string hello = "hello";
91 const char* world = " world";
92
93 BOOST_TEST((arg1 + arg2)(i100, i50) == (i100 + i50));
94 BOOST_TEST((arg1 + 3)(i100) == (3 + i100));
95 BOOST_TEST((arg1 + arg2)(hello, world) == "hello world");
96 BOOST_TEST((arg1 + arg2)(i1, d2_5) == (i1 + d2_5));
97
98 BOOST_TEST((*(arg1 + arg2))(world, i2) == *(world + i2));
99 BOOST_TEST((*(arg1 + arg2))(i2, world) == *(i2 + world));
100 BOOST_TEST((*(val(world+i2) - arg1))(i2) == *world);
101 }
102
103 return boost::report_errors();
104 }
105