1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374 |
- // Copyright Abel Sinkovics (abel@sinkovics.hu) 2010.
- // 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/metaparse/token.hpp>
- #include <boost/metaparse/keyword.hpp>
- #include <boost/metaparse/is_error.hpp>
- #include <boost/metaparse/start.hpp>
- #include <boost/metaparse/get_result.hpp>
- #include <boost/metaparse/get_remaining.hpp>
- #include "common.hpp"
- #include <boost/mpl/equal_to.hpp>
- #include <boost/mpl/apply.hpp>
- #include <boost/mpl/equal.hpp>
- #include <boost/mpl/assert.hpp>
- #include "test_case.hpp"
- namespace
- {
- using boost::metaparse::keyword;
- using boost::metaparse::token;
- using boost::mpl::list_c;
- typedef list_c<char, 'h', 'e', 'l', 'l', 'o', ' ', '\t'> str_hello_t;
- typedef keyword<str_hello, int13> test_parser;
- typedef token<test_parser> a_test_token;
- }
- BOOST_METAPARSE_TEST_CASE(token)
- {
- using boost::metaparse::get_result;
- using boost::metaparse::start;
- using boost::metaparse::get_remaining;
- using boost::metaparse::is_error;
-
- using boost::mpl::equal_to;
- using boost::mpl::apply_wrap2;
- using boost::mpl::equal;
- // test_no_space
- BOOST_MPL_ASSERT((
- equal_to<
- get_result<apply_wrap2<a_test_token, str_hello, start> >::type,
- get_result<apply_wrap2<test_parser, str_hello, start> >::type
- >
- ));
- // test_spaces
- BOOST_MPL_ASSERT((
- equal_to<
- get_result<apply_wrap2<a_test_token, str_hello_t, start> >::type,
- get_result<apply_wrap2<test_parser, str_hello, start> >::type
- >
- ));
- // test_spaces_consumed
- BOOST_MPL_ASSERT((
- equal<
- get_remaining<apply_wrap2<a_test_token, str_hello_t, start> >::type,
- str_
- >
- ));
- // test_fail
- BOOST_MPL_ASSERT((is_error<apply_wrap2<a_test_token, str_, start> >));
- }
|