| 1 | /*============================================================================= |
|---|
| 2 | Copyright (c) 2002-2003 Martin Wille |
|---|
| 3 | http://spirit.sourceforge.net/ |
|---|
| 4 | |
|---|
| 5 | Use, modification and distribution is subject to the Boost Software |
|---|
| 6 | License, Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at |
|---|
| 7 | http://www.boost.org/LICENSE_1_0.txt) |
|---|
| 8 | =============================================================================*/ |
|---|
| 9 | #include <iostream> |
|---|
| 10 | #include <cstring> |
|---|
| 11 | #include <boost/detail/lightweight_test.hpp> |
|---|
| 12 | |
|---|
| 13 | // This test program only includes the epsilon.hpp header from Spirit |
|---|
| 14 | #include <boost/spirit/core/composite/epsilon.hpp> |
|---|
| 15 | #include <boost/detail/lightweight_test.hpp> |
|---|
| 16 | #include "impl/var.hpp" |
|---|
| 17 | #include "impl/string_length.hpp" |
|---|
| 18 | |
|---|
| 19 | using namespace test; |
|---|
| 20 | static boost::spirit::parse_info<char const *> pi; |
|---|
| 21 | |
|---|
| 22 | //////////////////////////////////////////////// |
|---|
| 23 | // These macros are used with BOOST_TEST |
|---|
| 24 | #define matches (pi.hit) |
|---|
| 25 | #define full_match (pi.hit && pi.full) |
|---|
| 26 | #define partial_match (pi.hit && !pi.full) |
|---|
| 27 | #define no_match (!pi.hit && !pi.full) |
|---|
| 28 | #define zero_length_match (pi.length == 0) |
|---|
| 29 | #define stop_equals_start (pi.stop == s) |
|---|
| 30 | |
|---|
| 31 | template<typename ParserT> |
|---|
| 32 | static void |
|---|
| 33 | parse(char const *s, ParserT const &p, bool match) |
|---|
| 34 | { |
|---|
| 35 | |
|---|
| 36 | pi = boost::spirit::parse(s, s + test_impl::string_length(s), p); |
|---|
| 37 | if (match) |
|---|
| 38 | { |
|---|
| 39 | BOOST_TEST(matches); |
|---|
| 40 | BOOST_TEST(zero_length_match); |
|---|
| 41 | BOOST_TEST(stop_equals_start); |
|---|
| 42 | } |
|---|
| 43 | else |
|---|
| 44 | { |
|---|
| 45 | BOOST_TEST(no_match); |
|---|
| 46 | } |
|---|
| 47 | } |
|---|
| 48 | |
|---|
| 49 | static char const empty[] = ""; |
|---|
| 50 | static char const not_empty[] = "asdfgh"; |
|---|
| 51 | |
|---|
| 52 | //////////////////////////////////////////////// |
|---|
| 53 | // Test wether epsilon_p/eps_p work as |
|---|
| 54 | // primitive parsers |
|---|
| 55 | static void |
|---|
| 56 | epsilon_as_primitive() |
|---|
| 57 | { |
|---|
| 58 | // This test case also is a compile time check wether |
|---|
| 59 | // both eps_p and epsilon_p are present. |
|---|
| 60 | |
|---|
| 61 | parse(empty, boost::spirit::epsilon_p, true); |
|---|
| 62 | BOOST_TEST(full_match); |
|---|
| 63 | parse(not_empty, boost::spirit::epsilon_p, true); |
|---|
| 64 | BOOST_TEST(partial_match); |
|---|
| 65 | |
|---|
| 66 | parse(empty, boost::spirit::eps_p, true); |
|---|
| 67 | BOOST_TEST(full_match); |
|---|
| 68 | parse(not_empty, boost::spirit::eps_p, true); |
|---|
| 69 | BOOST_TEST(partial_match); |
|---|
| 70 | } |
|---|
| 71 | |
|---|
| 72 | //////////////////////////////////////////////// |
|---|
| 73 | // Test wether epsilon_p/eps_p work correctly as |
|---|
| 74 | // a parser generator for creating parsers from |
|---|
| 75 | // functors |
|---|
| 76 | static void |
|---|
| 77 | epsilon_as_parser_generator_for_functors() |
|---|
| 78 | { |
|---|
| 79 | bool flag = false; |
|---|
| 80 | parse(empty, boost::spirit::epsilon_p(var(flag)), flag); |
|---|
| 81 | BOOST_TEST(no_match); |
|---|
| 82 | |
|---|
| 83 | flag = true; |
|---|
| 84 | parse(empty, boost::spirit::epsilon_p(var(flag)), flag); |
|---|
| 85 | BOOST_TEST(full_match); |
|---|
| 86 | } |
|---|
| 87 | |
|---|
| 88 | //////////////////////////////////////////////// |
|---|
| 89 | // Test wether epsilon_p/eps_p work correctly as |
|---|
| 90 | // a parser generator for creating parsers from |
|---|
| 91 | // other parsers |
|---|
| 92 | static void |
|---|
| 93 | epsilon_as_parser_generator_for_parsers() |
|---|
| 94 | { |
|---|
| 95 | // This test case uses a parser created by epsilon_p |
|---|
| 96 | // as body-parser for another invokation of epsilon_p |
|---|
| 97 | |
|---|
| 98 | bool flag = false; |
|---|
| 99 | parse(empty, boost::spirit::epsilon_p( |
|---|
| 100 | boost::spirit::epsilon_p(var(flag))), flag); |
|---|
| 101 | BOOST_TEST(no_match); |
|---|
| 102 | |
|---|
| 103 | flag = true; |
|---|
| 104 | parse(empty, boost::spirit::epsilon_p( |
|---|
| 105 | boost::spirit::epsilon_p(var(flag))), flag); |
|---|
| 106 | BOOST_TEST(full_match); |
|---|
| 107 | } |
|---|
| 108 | |
|---|
| 109 | //////////////////////////////////////////////// |
|---|
| 110 | // Test wether epsilon_p/eps_p support negation |
|---|
| 111 | static void |
|---|
| 112 | negation_operator_for_epsilon() |
|---|
| 113 | { |
|---|
| 114 | bool flag = false; |
|---|
| 115 | parse(empty, ~boost::spirit::epsilon_p(var(flag)), !flag); |
|---|
| 116 | BOOST_TEST(full_match); |
|---|
| 117 | parse(empty, ~~boost::spirit::epsilon_p(var(flag)), flag); |
|---|
| 118 | BOOST_TEST(no_match); |
|---|
| 119 | |
|---|
| 120 | flag = true; |
|---|
| 121 | parse(empty, ~boost::spirit::epsilon_p(var(flag)), !flag); |
|---|
| 122 | BOOST_TEST(no_match); |
|---|
| 123 | parse(empty, ~~boost::spirit::epsilon_p(var(flag)), flag); |
|---|
| 124 | BOOST_TEST(full_match); |
|---|
| 125 | } |
|---|
| 126 | |
|---|
| 127 | int |
|---|
| 128 | main() |
|---|
| 129 | { |
|---|
| 130 | epsilon_as_primitive(); |
|---|
| 131 | epsilon_as_parser_generator_for_functors(); |
|---|
| 132 | epsilon_as_parser_generator_for_parsers(); |
|---|
| 133 | negation_operator_for_epsilon(); |
|---|
| 134 | |
|---|
| 135 | return boost::report_errors(); |
|---|
| 136 | } |
|---|