123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144 |
- // Copyright (c) 2001-2011 Hartmut Kaiser
- //
- // 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/config/warning_disable.hpp>
- #include <boost/detail/lightweight_test.hpp>
- #include <boost/assign/std/vector.hpp>
- #include <boost/spirit/include/karma_operator.hpp>
- #include <boost/spirit/include/karma_char.hpp>
- #include <boost/spirit/include/karma_string.hpp>
- #include <boost/spirit/include/karma_numeric.hpp>
- #include <boost/spirit/include/karma_directive.hpp>
- #include <boost/spirit/include/karma_operator.hpp>
- #include <boost/spirit/include/karma_action.hpp>
- #include <boost/spirit/include/karma_nonterminal.hpp>
- #include <boost/spirit/include/karma_auxiliary.hpp>
- #include <boost/spirit/include/karma_directive.hpp>
- #include <boost/spirit/include/karma_phoenix_attributes.hpp>
- #include <boost/spirit/include/support_argument.hpp>
- #include <boost/spirit/include/phoenix_core.hpp>
- #include <boost/spirit/include/phoenix_operator.hpp>
- #include <boost/fusion/include/std_pair.hpp>
- #include <string>
- #include <iostream>
- #include <vector>
- #include "test.hpp"
- using namespace spirit_test;
- ///////////////////////////////////////////////////////////////////////////////
- struct action
- {
- action (std::vector<char>& vec)
- : vec(vec), it(vec.begin())
- {}
- void operator()(unsigned& value, boost::spirit::unused_type, bool& pass) const
- {
- pass = (it != vec.end());
- if (pass)
- value = *it++;
- }
- std::vector<char>& vec;
- mutable std::vector<char>::iterator it;
- };
- ///////////////////////////////////////////////////////////////////////////////
- int main()
- {
- using namespace boost::spirit::ascii;
- using boost::spirit::karma::repeat;
- using boost::spirit::karma::inf;
- using boost::spirit::karma::int_;
- using boost::spirit::karma::hex;
- using boost::spirit::karma::_1;
-
- { // lazy repeats
- using boost::phoenix::val;
- std::string str8("aaaaaaaa");
- BOOST_TEST(test("aaaaaaaa", repeat[char_], str8)); // kleene synonym
- BOOST_TEST(test("aaaaaaaa", repeat(val(8))[char_], str8));
- BOOST_TEST(test("aaa", repeat(val(3))[char_], str8));
- BOOST_TEST(!test("aaaaaaaa", repeat(val(9))[char_], str8));
- std::string str3("aaa");
- BOOST_TEST(test("aaaaa", repeat(val(3), val(5))[char_], str8));
- BOOST_TEST(test("aaa", repeat(val(3), val(5))[char_], str3));
- BOOST_TEST(!test("aaa", repeat(val(4), val(5))[char_], str3));
- BOOST_TEST(test("aaa", repeat(val(3), val(inf))[char_], str3));
- BOOST_TEST(test("aaaaaaaa", repeat(val(3), val(inf))[char_], str8));
- BOOST_TEST(!test("aaa", repeat(val(4), val(inf))[char_], str3));
- }
- {
- std::string str8("aaaaaaaa");
- BOOST_TEST(test("aaaaaaaa", repeat[char_], str8)); // kleene synonym
- BOOST_TEST(test("aaaaaaaa", repeat(8)[char_], str8));
- BOOST_TEST(test("aaa", repeat(3)[char_], str8));
- BOOST_TEST(!test("aaaaaaaa", repeat(9)[char_], str8));
- std::string str3("aaa");
- BOOST_TEST(test("aaaaa", repeat(3, 5)[char_], str8));
- BOOST_TEST(test("aaa", repeat(3, 5)[char_], str3));
- BOOST_TEST(!test("aaa", repeat(4, 5)[char_], str3));
- BOOST_TEST(test("aaa", repeat(3, inf)[char_], str3));
- BOOST_TEST(test("aaaaaaaa", repeat(3, inf)[char_], str8));
- BOOST_TEST(!test("aaa", repeat(4, inf)[char_], str3));
- }
- {
- std::string str8("aaaaaaaa");
- BOOST_TEST(test_delimited("a a a a a a a a ", repeat[char_], str8, space));
- BOOST_TEST(test_delimited("a a a a a a a a ", repeat(8)[char_], str8, space));
- BOOST_TEST(test_delimited("a a a ", repeat(3)[char_], str8, space));
- BOOST_TEST(!test_delimited("a a a a a a a a ", repeat(9)[char_], str8, space));
- std::string str3("aaa");
- BOOST_TEST(test_delimited("a a a a a ", repeat(3, 5)[char_], str8, space));
- BOOST_TEST(test_delimited("a a a ", repeat(3, 5)[char_], str3, space));
- BOOST_TEST(!test_delimited("a a a ", repeat(4, 5)[char_], str3, space));
- BOOST_TEST(test_delimited("a a a ", repeat(3, inf)[char_], str3, space));
- BOOST_TEST(test_delimited("a a a a a a a a ", repeat(3, inf)[char_], str8, space));
- BOOST_TEST(!test_delimited("a a a ", repeat(4, inf)[char_], str3, space));
- }
- {
- // make sure user defined end condition is applied if no attribute
- // is passed in
- using namespace boost::assign;
- std::vector<char> v;
- v += 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h';
- BOOST_TEST(test("[6162636465666768]",
- '[' << repeat[hex[action(v)]] << ']'));
- }
- // we support Phoenix attributes only starting with V2.2
- #if SPIRIT_VERSION >= 0x2020
- {
- namespace ascii = boost::spirit::ascii;
- namespace phoenix = boost::phoenix;
- char c = 'a';
- BOOST_TEST(test("bcd", repeat(3)[ascii::char_[_1 = ++phoenix::ref(c)]]));
- c = 'a';
- BOOST_TEST(test("bcd", repeat(3)[ascii::char_], ++phoenix::ref(c)));
- }
- #endif
- return boost::report_errors();
- }
|