1 /*=============================================================================
2     Copyright (c) 2001-2011 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 #include <boost/detail/lightweight_test.hpp>
8 #include <boost/spirit/include/qi_char.hpp>
9 #include <boost/spirit/include/qi_string.hpp>
10 #include <boost/spirit/include/qi_numeric.hpp>
11 #include <boost/spirit/include/qi_auxiliary.hpp>
12 #include <boost/spirit/include/qi_action.hpp>
13 #include <boost/spirit/include/qi_nonterminal.hpp>
14 #include <boost/spirit/include/qi_operator.hpp>
15 #include <boost/spirit/include/support_argument.hpp>
16 #include <boost/spirit/include/phoenix_core.hpp>
17 #include <boost/spirit/include/phoenix_operator.hpp>
18 
19 #include <iostream>
20 #include "test.hpp"
21 
22 int
main()23 main()
24 {
25     using spirit_test::test;
26     using spirit_test::test_attr;
27 
28     namespace qi = boost::spirit::qi;
29     using boost::spirit::qi::_1;
30     using boost::spirit::qi::_val;
31     using boost::spirit::qi::int_;
32     using boost::spirit::qi::rule;
33     using boost::spirit::ascii::char_;
34 
35     using boost::phoenix::val;
36     using boost::phoenix::ref;
37 
38     {
39         BOOST_TEST(test("123", val(int_)));
40     }
41 
42     {
43         int result;
44         BOOST_TEST(test("123", qi::lazy(val(int_))[ref(result) = _1]));
45         BOOST_TEST((result == 123));
46     }
47 
48     {
49         rule<char const*, char()> r;
50 
51         r = char_[_val = _1] >> *qi::lazy(_val);
52 
53         BOOST_TEST(test("aaaaaaaaaaaa", r));
54         BOOST_TEST(!test("abbbbbbbbbb", r));
55         BOOST_TEST(test("bbbbbbbbbbb", r));
56     }
57 
58     {
59         rule<char const*, std::string()> r;
60 
61         r =
62                 '<' >> *(char_ - '>')[_val += _1] >> '>'
63             >>  "</" >> qi::lazy(_val) >> '>'
64         ;
65 
66         BOOST_TEST(test("<tag></tag>", r));
67         BOOST_TEST(!test("<foo></bar>", r));
68     }
69 
70     return boost::report_errors();
71 }
72