| // 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) |
| |
| // #define KARMA_TEST_COMPILE_FAIL |
| |
| #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(); |
| } |
| |