boost_phoenix 0.1.0

Boost C++ library boost_phoenix packaged using Zanbil
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77

/*==============================================================================
    Copyright (c) 2008 Peter Dimov
    Copyright (c) 2005-2010 Joel de Guzman
    Copyright (c) 2010 Thomas Heller

    Distributed under the Boost Software License, Version 1.0. (See accompanying
    file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
==============================================================================*/

#include <boost/phoenix/core.hpp>
#include <boost/phoenix/bind.hpp>
#include <boost/phoenix/operator.hpp>

#include <iostream>
#include <boost/detail/lightweight_test.hpp>

bool
f(bool x)
{
    return x;
}

bool
g(bool x)
{
    return !x;
}

bool
h()
{
    BOOST_ERROR("Short-circuit evaluation failure");
    return false;
}

template <typename F, typename A1, typename A2, typename R>
void
tester(F f, A1 a1, A2 a2, R r)
{
    BOOST_TEST(f(a1, a2) == r);
}

int main()
{
    using boost::phoenix::bind;
    using boost::phoenix::placeholders::_1;
    using boost::phoenix::placeholders::_2;

    // &&

    tester(bind(f, true) && bind(g, true), false, false, f(true) && g(true));
    tester(bind(f, true) && bind(g, false), false, false, f(true) && g(false));

    tester(bind(f, false) && bind(h), false, false, f(false) && h());

    tester(bind(f, _1) && bind(g, _2), true, true, f(true) && g(true));
    tester(bind(f, _1) && bind(g, _2), true, false, f(true) && g(false));

    tester(bind(f, _1) && bind(h), false, false, f(false) && h());

    // ||

    tester(bind(f, false) || bind(g, true), false, false, f(false) || g(true));

    tester(bind(f, false) || bind(g, false), false, false, f(false) || g(false));

    tester(bind(f, true) || bind(h), false, false, f(true) || h());

    tester(bind(f, _1) || bind(g, _2), false, true, f(false) || g(true));
    tester(bind(f, _1) || bind(g, _2), false, false, f(false) || g(false));

    tester(bind(f, _1) || bind(h), true, false, f(true) || h());

    //

    return boost::report_errors();
}