123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141 |
- // 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/spirit/include/karma_auxiliary.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_generate.hpp>
- #include <boost/spirit/include/karma_operator.hpp>
- #include <boost/spirit/include/karma_directive.hpp>
- #include <boost/spirit/include/karma_nonterminal.hpp>
- #include <boost/spirit/include/karma_auxiliary.hpp>
- #include "test.hpp"
- using namespace spirit_test;
- ///////////////////////////////////////////////////////////////////////////////
- int
- main()
- {
- using namespace boost;
- using namespace boost::spirit;
- using namespace boost::spirit::ascii;
- {
- // test if alternatives with all components having unused
- // attribute generate first alternative
- fusion::vector<char, char> v('a', 'b');
- BOOST_TEST(test("axb", char_ << (lit('x') | lit('i')) << char_, v));
- BOOST_TEST(test("axib",
- char_ << (lit('x') << lit('i') | lit('i')) << char_, v));
- }
- {
- BOOST_TEST(test_delimited("x ", char_('x') | char_('i'), char_(' ')));
- BOOST_TEST(test_delimited("x i ",
- char_('x') << char_('i') | char_('i'), char_(' ')));
- BOOST_TEST(test_delimited("i ",
- char_('i') | char_('x') << char_('i'), char_(' ')));
- variant<int, char> v (10);
- BOOST_TEST(test_delimited("10 ", char_ | int_, v, char_(' ')));
- BOOST_TEST(test_delimited("10 ", int_ | char_, v, char_(' ')));
- BOOST_TEST(test_delimited("a ", lit('a') | char_ | int_, v, char_(' ')));
- BOOST_TEST(test_delimited("a ", char_ | lit('a') | int_, v, char_(' ')));
- BOOST_TEST(test_delimited("10 ", int_ | lit('a') | char_, v, char_(' ')));
- v = 'c';
- BOOST_TEST(test_delimited("c ", char_ | int_, v, char_(' ')));
- BOOST_TEST(test_delimited("a ", lit('a') | char_ | int_, v, char_(' ')));
- BOOST_TEST(test_delimited("c ", char_ | lit('a') | int_, v, char_(' ')));
- BOOST_TEST(test_delimited("a ", int_ | lit('a') | char_, v, char_(' ')));
- BOOST_TEST(test_delimited("c ", int_ | char_ | lit('a'), v, char_(' ')));
- }
- // this leads to infinite loops
- // {
- // variant<int, std::string> v(10);
- // BOOST_TEST(test("10", int_ | +char_, v));
- //
- // v = "abc";
- // BOOST_TEST(test("abc", int_ | +char_, v));
- // }
- {
- // if nothing matches, the first explicit alternative will be chosen
- variant<double, char const*> v (10.0);
- BOOST_TEST(test("11", char_ | lit(11), v));
- BOOST_TEST(test("11", lit(11) | char_ , v));
- BOOST_TEST(test("10.0", double_ | lit(11), v));
- BOOST_TEST(test("11", lit(11) | double_, v));
- BOOST_TEST(!test("", char_ | int_, v));
- v = "c";
- BOOST_TEST(test("11", char_ | lit(11), v));
- BOOST_TEST(test("11", double_ | lit(11), v));
- BOOST_TEST(!test("", char_ | int_, v));
- }
- {
- // in strict mode if nothing matches, the alternative will fail
- variant<double, char const*> v (10.0);
- BOOST_TEST(!test("11", strict[char_ | lit(11)], v));
- BOOST_TEST(test("11", strict[lit(11) | char_] , v));
- v = "c";
- BOOST_TEST(!test("11", strict[char_ | lit(11)], v));
- }
- {
- // if nothing matches, the first explicit alternative will be chosen
- variant<double, char const*> v (10.0);
- BOOST_TEST(test_delimited("11 ", char_ | lit(11), v, char_(' ')));
- BOOST_TEST(test_delimited("11 ", lit(11) | char_ , v, char_(' ')));
- BOOST_TEST(test_delimited("10.0 ", double_ | lit(11), v, char_(' ')));
- BOOST_TEST(test_delimited("11 ", lit(11) | double_, v, char_(' ')));
- BOOST_TEST(!test_delimited("", char_ | int_, v, char_(' ')));
- v = "c";
- BOOST_TEST(test_delimited("11 ", char_ | lit(11), v, char_(' ')));
- BOOST_TEST(test_delimited("11 ", double_ | lit(11), v, char_(' ')));
- BOOST_TEST(!test_delimited("", char_ | int_, v, char_(' ')));
- }
- {
- // if nothing matches, the first explicit alternative will be chosen,
- // optionals need to be accepted
- optional<variant<double, char const*> > v (10.0);
- BOOST_TEST(test_delimited("11 ", char_ | lit(11), v, char_(' ')));
- BOOST_TEST(test_delimited("11 ", lit(11) | char_ , v, char_(' ')));
- BOOST_TEST(test_delimited("10.0 ", double_ | lit(11), v, char_(' ')));
- BOOST_TEST(test_delimited("11 ", lit(11) | double_, v, char_(' ')));
- BOOST_TEST(!test_delimited("", char_ | int_, v, char_(' ')));
- v = "c";
- BOOST_TEST(test_delimited("11 ", char_ | lit(11), v, char_(' ')));
- BOOST_TEST(test_delimited("11 ", double_ | lit(11), v, char_(' ')));
- BOOST_TEST(!test_delimited("", char_ | int_, v, char_(' ')));
- }
- {
- std::vector<int> v;
- BOOST_TEST(test("[]", '[' << (int_ % ", ") << ']' | "[]", v));
- BOOST_TEST(test("[]", '[' << -(int_ % ", ") << ']', v));
- BOOST_TEST(test("[]", '[' << ((int_ % ", ") | eps) << ']', v));
- v.push_back(5);
- v.push_back(5);
- v.push_back(5);
- BOOST_TEST(test("[5, 5, 5]", '[' << (int_ % ", ") << ']' | "[]", v));
- }
- return boost::report_errors();
- }
|