123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170 |
- // 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/mpl/vector.hpp>
- #include <boost/mpl/for_each.hpp>
- #include <boost/mpl/if.hpp>
- #include <boost/mpl/bool.hpp>
- #include <boost/spirit/include/phoenix_core.hpp>
- #include <boost/spirit/include/phoenix_operator.hpp>
- #include <boost/spirit/include/karma_char.hpp>
- #include <boost/spirit/include/karma_numeric.hpp>
- #include <boost/spirit/include/karma_directive.hpp>
- #include <boost/spirit/include/karma_action.hpp>
- #include <boost/limits.hpp>
- #include "test.hpp"
- using namespace spirit_test;
- ///////////////////////////////////////////////////////////////////////////////
- int
- main()
- {
- using namespace boost::spirit;
- {
- using namespace boost::spirit::ascii;
- ///////////////////////////////////////////////////////////////////////
- // this is currently ambiguous with character literals
- BOOST_TEST(test("0", 0));
- BOOST_TEST(test("123", 123));
- BOOST_TEST(test("-123", -123));
- BOOST_TEST(test("0", int_, 0));
- BOOST_TEST(test("123", int_, 123));
- BOOST_TEST(test("-123", int_, -123));
- BOOST_TEST(test_delimited("0 ", int_, 0, char_(' ')));
- BOOST_TEST(test_delimited("123 ", int_, 123, char_(' ')));
- BOOST_TEST(test_delimited("-123 ", int_, -123, char_(' ')));
- BOOST_TEST(test("0", lower[int_], 0));
- BOOST_TEST(test("123", lower[int_], 123));
- BOOST_TEST(test("-123", lower[int_], -123));
- BOOST_TEST(test_delimited("0 ", lower[int_], 0, char_(' ')));
- BOOST_TEST(test_delimited("123 ", lower[int_], 123, char_(' ')));
- BOOST_TEST(test_delimited("-123 ", lower[int_], -123, char_(' ')));
- BOOST_TEST(test("0", upper[int_], 0));
- BOOST_TEST(test("123", upper[int_], 123));
- BOOST_TEST(test("-123", upper[int_], -123));
- BOOST_TEST(test_delimited("0 ", upper[int_], 0, char_(' ')));
- BOOST_TEST(test_delimited("123 ", upper[int_], 123, char_(' ')));
- BOOST_TEST(test_delimited("-123 ", upper[int_], -123, char_(' ')));
- ///////////////////////////////////////////////////////////////////////
- BOOST_TEST(test("0", int_(0)));
- BOOST_TEST(test("123", int_(123)));
- BOOST_TEST(test("-123", int_(-123)));
- BOOST_TEST(test_delimited("0 ", int_(0), char_(' ')));
- BOOST_TEST(test_delimited("123 ", int_(123), char_(' ')));
- BOOST_TEST(test_delimited("-123 ", int_(-123), char_(' ')));
- BOOST_TEST(test("0", lower[int_(0)]));
- BOOST_TEST(test("123", lower[int_(123)]));
- BOOST_TEST(test("-123", lower[int_(-123)]));
- BOOST_TEST(test_delimited("0 ", lower[int_(0)], char_(' ')));
- BOOST_TEST(test_delimited("123 ", lower[int_(123)], char_(' ')));
- BOOST_TEST(test_delimited("-123 ", lower[int_(-123)], char_(' ')));
- BOOST_TEST(test("0", upper[int_(0)]));
- BOOST_TEST(test("123", upper[int_(123)]));
- BOOST_TEST(test("-123", upper[int_(-123)]));
- BOOST_TEST(test_delimited("0 ", upper[int_(0)], char_(' ')));
- BOOST_TEST(test_delimited("123 ", upper[int_(123)], char_(' ')));
- BOOST_TEST(test_delimited("-123 ", upper[int_(-123)], char_(' ')));
- }
- { // literals, make sure there are no ambiguities
- BOOST_TEST(test("0", lit(short(0))));
- BOOST_TEST(test("0", lit(0)));
- BOOST_TEST(test("0", lit(0L)));
- #ifdef BOOST_HAS_LONG_LONG
- BOOST_TEST(test("0", lit(0LL)));
- #endif
- BOOST_TEST(test("0", lit((unsigned short)0)));
- BOOST_TEST(test("0", lit(0U)));
- BOOST_TEST(test("0", lit(0UL)));
- #ifdef BOOST_HAS_LONG_LONG
- BOOST_TEST(test("0", lit(0ULL)));
- #endif
- BOOST_TEST(test("a", lit('a')));
- BOOST_TEST(test("a", 'a'));
- BOOST_TEST(test(L"a", L'a'));
- }
- { // lazy numerics
- using namespace boost::phoenix;
- BOOST_TEST(test("0", int_(val(0))));
- BOOST_TEST(test("123", int_(val(123))));
- BOOST_TEST(test("-123", int_(val(-123))));
- int i1 = 0, i2 = 123, i3 = -123;
- BOOST_TEST(test("0", int_(ref(i1))));
- BOOST_TEST(test("123", int_(ref(i2))));
- BOOST_TEST(test("-123", int_(ref(i3))));
- }
-
- {
- ///////////////////////////////////////////////////////////////////////
- using namespace boost::spirit::ascii;
- BOOST_TEST(test("1234", uint_(1234)));
- BOOST_TEST(test("ff", hex(0xff)));
- BOOST_TEST(test("1234", oct(01234)));
- BOOST_TEST(test("11110000", bin(0xf0)));
- BOOST_TEST(test_delimited("1234 ", uint_(1234), char_(' ')));
- BOOST_TEST(test_delimited("ff ", hex(0xff), char_(' ')));
- BOOST_TEST(test_delimited("1234 ", oct(01234), char_(' ')));
- BOOST_TEST(test_delimited("11110000 ", bin(0xf0), char_(' ')));
- BOOST_TEST(test("1234", lower[uint_(1234)]));
- BOOST_TEST(test("ff", lower[hex(0xff)]));
- BOOST_TEST(test("1234", lower[oct(01234)]));
- BOOST_TEST(test("11110000", lower[bin(0xf0)]));
- BOOST_TEST(test_delimited("1234 ", lower[uint_(1234)], char_(' ')));
- BOOST_TEST(test_delimited("ff ", lower[hex(0xff)], char_(' ')));
- BOOST_TEST(test_delimited("1234 ", lower[oct(01234)], char_(' ')));
- BOOST_TEST(test_delimited("11110000 ", lower[bin(0xf0)], char_(' ')));
- BOOST_TEST(test("1234", upper[uint_(1234)]));
- BOOST_TEST(test("FF", upper[hex(0xff)]));
- BOOST_TEST(test("1234", upper[oct(01234)]));
- BOOST_TEST(test("11110000", upper[bin(0xf0)]));
- BOOST_TEST(test_delimited("1234 ", upper[uint_(1234)], char_(' ')));
- BOOST_TEST(test_delimited("FF ", upper[hex(0xff)], char_(' ')));
- BOOST_TEST(test_delimited("1234 ", upper[oct(01234)], char_(' ')));
- BOOST_TEST(test_delimited("11110000 ", upper[bin(0xf0)], char_(' ')));
- BOOST_TEST(test("FF", upper[upper[hex(0xff)]]));
- BOOST_TEST(test("FF", upper[lower[hex(0xff)]]));
- BOOST_TEST(test("ff", lower[upper[hex(0xff)]]));
- BOOST_TEST(test("ff", lower[lower[hex(0xff)]]));
- BOOST_TEST(test_delimited("FF ", upper[upper[hex(0xff)]], char_(' ')));
- BOOST_TEST(test_delimited("FF ", upper[lower[hex(0xff)]], char_(' ')));
- BOOST_TEST(test_delimited("ff ", lower[upper[hex(0xff)]], char_(' ')));
- BOOST_TEST(test_delimited("ff ", lower[lower[hex(0xff)]], char_(' ')));
- }
- return boost::report_errors();
- }
|