1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495 |
- /*=============================================================================
- Phoenix V1.2.1
- Copyright (c) 2001-2003 Joel de Guzman
- Use, modification and distribution is subject to 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 <iostream>
- #include <cmath>
- #include <boost/detail/lightweight_test.hpp>
- #define PHOENIX_LIMIT 15
- #include <boost/spirit/include/phoenix1_primitives.hpp>
- #include <boost/spirit/include/phoenix1_composite.hpp>
- #include <boost/spirit/include/phoenix1_functions.hpp>
- #include <boost/spirit/include/phoenix1_operators.hpp>
- using namespace phoenix;
- using namespace std;
- ///////////////////////////////////////////////////////////////////////////////
- struct test_ {
- typedef void result_type;
- void operator()() const { cout << "TEST LAZY FUNCTION\n"; }
- };
- function<test_> test;
- ///////////////////////////////////////////////////////////////////////////////
- struct sqr_ {
- template <typename ArgT>
- struct result { typedef ArgT type; };
- template <typename ArgT>
- ArgT operator()(ArgT n) const { return n * n; }
- };
- function<sqr_> sqr;
- ///////////////////////////////////////////////////////////////////////////////
- struct fact_ {
- template <typename ArgT>
- struct result { typedef ArgT type; };
- template <typename ArgT>
- ArgT operator()(ArgT n) const
- { return (n <= 0) ? 1 : n * this->operator()(n-1); }
- };
- function<fact_> fact;
- ///////////////////////////////////////////////////////////////////////////////
- struct pow_ {
- template <typename Arg1T, typename Arg2T>
- struct result { typedef Arg1T type; };
- template <typename Arg1T, typename Arg2T>
- Arg1T operator()(Arg1T a, Arg2T b) const { return pow(a, b); }
- };
- function<pow_> power;
- ///////////////////////////////////////////////////////////////////////////////
- int
- main()
- {
- int i5 = 5;
- double d5 = 5, d3 = 3;
- ///////////////////////////////////////////////////////////////////////////////
- //
- // Lazy functors
- //
- ///////////////////////////////////////////////////////////////////////////////
- test()();
- BOOST_TEST(sqr(arg1)(i5) == (i5*i5));
- BOOST_TEST(fact(4)() == 24);
- BOOST_TEST(fact(arg1)(i5) == 120);
- BOOST_TEST((int)power(arg1, arg2)(d5, d3) == (int)pow(d5, d3));
- BOOST_TEST((sqr(arg1) + 5)(i5) == ((i5*i5)+5));
- ///////////////////////////////////////////////////////////////////////////////
- //
- // End asserts
- //
- ///////////////////////////////////////////////////////////////////////////////
- return boost::report_errors();
- }
|