|
Chris@16
|
1 /*=============================================================================
|
|
Chris@16
|
2 Copyright (c) 2001-2007 Joel de Guzman
|
|
Chris@16
|
3
|
|
Chris@16
|
4 Distributed under the Boost Software License, Version 1.0. (See accompanying
|
|
Chris@16
|
5 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
|
Chris@16
|
6 ==============================================================================*/
|
|
Chris@16
|
7 #ifndef PHOENIX_OPERATOR_BITWISE_HPP
|
|
Chris@16
|
8 #define PHOENIX_OPERATOR_BITWISE_HPP
|
|
Chris@16
|
9
|
|
Chris@16
|
10 #include <boost/spirit/home/phoenix/core/composite.hpp>
|
|
Chris@16
|
11 #include <boost/spirit/home/phoenix/core/compose.hpp>
|
|
Chris@16
|
12 #include <boost/spirit/home/phoenix/detail/type_deduction.hpp>
|
|
Chris@16
|
13 #include <boost/spirit/home/phoenix/operator/detail/unary_eval.hpp>
|
|
Chris@16
|
14 #include <boost/spirit/home/phoenix/operator/detail/unary_compose.hpp>
|
|
Chris@16
|
15 #include <boost/spirit/home/phoenix/operator/detail/binary_eval.hpp>
|
|
Chris@16
|
16 #include <boost/spirit/home/phoenix/operator/detail/binary_compose.hpp>
|
|
Chris@16
|
17
|
|
Chris@16
|
18 #ifdef BOOST_MSVC
|
|
Chris@16
|
19 # pragma warning(push)
|
|
Chris@16
|
20 # pragma warning(disable : 4800)
|
|
Chris@16
|
21 #endif
|
|
Chris@16
|
22
|
|
Chris@16
|
23 namespace boost { namespace phoenix
|
|
Chris@16
|
24 {
|
|
Chris@16
|
25 struct invert_eval;
|
|
Chris@16
|
26
|
|
Chris@16
|
27 struct and_assign_eval;
|
|
Chris@16
|
28 struct or_assign_eval;
|
|
Chris@16
|
29 struct xor_assign_eval;
|
|
Chris@16
|
30 struct shift_left_assign_eval;
|
|
Chris@16
|
31 struct shift_right_assign_eval;
|
|
Chris@16
|
32
|
|
Chris@16
|
33 struct and_eval;
|
|
Chris@16
|
34 struct or_eval;
|
|
Chris@16
|
35 struct xor_eval;
|
|
Chris@16
|
36 struct shift_left_eval;
|
|
Chris@16
|
37 struct shift_right_eval;
|
|
Chris@16
|
38
|
|
Chris@16
|
39 BOOST_UNARY_RESULT_OF(~x, result_of_invert)
|
|
Chris@16
|
40
|
|
Chris@16
|
41 BOOST_BINARY_RESULT_OF(x &= y, result_of_and_assign)
|
|
Chris@16
|
42 BOOST_BINARY_RESULT_OF(x |= y, result_of_or_assign)
|
|
Chris@16
|
43 BOOST_BINARY_RESULT_OF(x ^= y, result_of_xor_assign)
|
|
Chris@16
|
44 BOOST_BINARY_RESULT_OF(x <<= y, result_of_shift_left_assign)
|
|
Chris@16
|
45 BOOST_BINARY_RESULT_OF(x >>= y, result_of_shift_right_assign)
|
|
Chris@16
|
46
|
|
Chris@16
|
47 BOOST_BINARY_RESULT_OF(x & y, result_of_and)
|
|
Chris@16
|
48 BOOST_BINARY_RESULT_OF(x | y, result_of_or)
|
|
Chris@16
|
49 BOOST_BINARY_RESULT_OF(x ^ y, result_of_xor)
|
|
Chris@16
|
50 BOOST_BINARY_RESULT_OF(x << y, result_of_shift_left)
|
|
Chris@16
|
51 BOOST_BINARY_RESULT_OF(x >> y, result_of_shift_right)
|
|
Chris@16
|
52
|
|
Chris@16
|
53 #define x a0.eval(env)
|
|
Chris@16
|
54 #define y a1.eval(env)
|
|
Chris@16
|
55
|
|
Chris@16
|
56 PHOENIX_UNARY_EVAL(invert_eval, result_of_invert, ~x)
|
|
Chris@16
|
57 PHOENIX_UNARY_COMPOSE(invert_eval, ~)
|
|
Chris@16
|
58
|
|
Chris@16
|
59 PHOENIX_BINARY_EVAL(and_assign_eval, result_of_and_assign, x &= y)
|
|
Chris@16
|
60 PHOENIX_BINARY_EVAL(or_assign_eval, result_of_or_assign, x |= y)
|
|
Chris@16
|
61 PHOENIX_BINARY_EVAL(xor_assign_eval, result_of_xor_assign, x ^= y)
|
|
Chris@16
|
62 PHOENIX_BINARY_EVAL(shift_left_assign_eval, result_of_shift_left_assign, x <<= y)
|
|
Chris@16
|
63 PHOENIX_BINARY_EVAL(shift_right_assign_eval, result_of_shift_right_assign, x >>= y)
|
|
Chris@16
|
64
|
|
Chris@16
|
65 PHOENIX_BINARY_EVAL(and_eval, result_of_and, x & y)
|
|
Chris@16
|
66 PHOENIX_BINARY_EVAL(or_eval, result_of_or, x | y)
|
|
Chris@16
|
67 PHOENIX_BINARY_EVAL(xor_eval, result_of_xor, x ^ y)
|
|
Chris@16
|
68 PHOENIX_BINARY_EVAL(shift_left_eval, result_of_shift_left, x << y)
|
|
Chris@16
|
69 PHOENIX_BINARY_EVAL(shift_right_eval, result_of_shift_right, x >> y)
|
|
Chris@16
|
70
|
|
Chris@16
|
71 PHOENIX_BINARY_COMPOSE(and_assign_eval, &=)
|
|
Chris@16
|
72 PHOENIX_BINARY_COMPOSE(or_assign_eval, |=)
|
|
Chris@16
|
73 PHOENIX_BINARY_COMPOSE(xor_assign_eval, ^=)
|
|
Chris@16
|
74 PHOENIX_BINARY_COMPOSE(shift_left_assign_eval, <<=)
|
|
Chris@16
|
75 PHOENIX_BINARY_COMPOSE(shift_right_assign_eval, >>=)
|
|
Chris@16
|
76
|
|
Chris@16
|
77 PHOENIX_BINARY_COMPOSE(and_eval, &)
|
|
Chris@16
|
78 PHOENIX_BINARY_COMPOSE(or_eval, |)
|
|
Chris@16
|
79 PHOENIX_BINARY_COMPOSE(xor_eval, ^)
|
|
Chris@16
|
80 PHOENIX_BINARY_COMPOSE(shift_left_eval, <<)
|
|
Chris@16
|
81 PHOENIX_BINARY_COMPOSE(shift_right_eval, >>)
|
|
Chris@16
|
82
|
|
Chris@16
|
83 #undef x
|
|
Chris@16
|
84 #undef y
|
|
Chris@16
|
85 }}
|
|
Chris@16
|
86
|
|
Chris@16
|
87 #if defined(BOOST_MSVC)
|
|
Chris@16
|
88 # pragma warning(pop)
|
|
Chris@16
|
89 #endif
|
|
Chris@16
|
90
|
|
Chris@16
|
91 #endif
|
