Adding upstream version 14.2.21.upstream/14.2.21upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 189 insertions, 0 deletions

diff --git a/src/boost/libs/spirit/classic/test/directives_tests.cpp b/src/boost/libs/spirit/classic/test/directives_tests.cpp
new file mode 100644
index 00000000..e45b9d7f
--- /dev/null
+++ b/src/boost/libs/spirit/classic/test/directives_tests.cpp
@@ -0,0 +1,189 @@
+/*=============================================================================
+    Copyright (c) 2001-2003 Joel de Guzman
+    http://spirit.sourceforge.net/
+
+    Use, modification and distribution is subject to 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 <iostream>
+#include <boost/detail/lightweight_test.hpp>
+#include <string>
+
+
+#include "impl/string_length.hpp"
+#include <boost/spirit/include/classic_core.hpp>
+#include <boost/spirit/include/classic_assign_actor.hpp>
+using namespace BOOST_SPIRIT_CLASSIC_NS;
+
+///////////////////////////////////////////////////////////////////////////////
+//
+//  Directives tests
+//
+///////////////////////////////////////////////////////////////////////////////
+void
+directives_test1()
+{
+    char const* cpx = "H e l l o";
+    char const* cpx_first = cpx;
+    char const* cpx_last = cpx + test_impl::string_length(cpx);
+
+    match<> hit;
+    typedef skipper_iteration_policy<iteration_policy> iter_policy;
+    scanner<char const*, scanner_policies<iter_policy> >
+        scanx(cpx_first, cpx_last);
+
+    hit = str_p("Hello").parse(scanx);
+    BOOST_TEST(!hit);
+    scanx.first = cpx;
+
+    hit = chseq_p("Hello").parse(scanx);
+    BOOST_TEST(!!hit);
+    scanx.first = cpx;
+
+    char const* cp = "Hello \n\tWorld";
+    char const* cp_first = cp;
+    char const* cp_last = cp + test_impl::string_length(cp);
+
+    scanner<char const*, scanner_policies<iter_policy> >
+        scan(cp_first, cp_last);
+
+    hit = (+(alpha_p | punct_p)).parse(scan);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scan.first == scan.last);
+    scan.first = cp;
+
+    hit = (+(lexeme_d[+(alpha_p | '\'')])).parse(scan);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scan.first == scan.last);
+    scan.first = cp;
+
+    hit = (+(lexeme_d[lexeme_d[+anychar_p]])).parse(scan);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scan.first == scan.last);
+    scan.first = cp;
+
+    hit = (str_p("Hello") >> "World").parse(scan);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scan.first == scan.last);
+    scan.first = cp;
+
+    hit = as_lower_d[str_p("hello") >> "world"].parse(scan);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scan.first == scan.last);
+    scan.first = cp;
+
+    hit = (+(as_lower_d[as_lower_d[+lower_p | '\'']])).parse(scan);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scan.first == scan.last);
+    scan.first = cp;
+
+    char const* cpy = "123.456";
+    char const* cpy_first = cpy;
+    char const* cpy_last = cpy + test_impl::string_length(cpy);
+
+    scanner<> scany(cpy_first, cpy_last);
+    hit = longest_d[(+digit_p >> '.' >> +digit_p) | (+digit_p)].parse(scany);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scany.first == scany.last);
+    scany.first = cpy;
+
+    hit = shortest_d[(+digit_p >> '.' >> +digit_p) | (+digit_p)].parse(scany);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scany.first != scany.last);
+    scany.first = cpy;
+
+    char const* cpz = "razamanaz";
+    char const* cpz_first = cpz;
+    char const* cpz_last = cpz + test_impl::string_length(cpz);
+
+    scanner<> scanz(cpz_first, cpz_last);
+    hit = longest_d[str_p("raza") | "razaman" | "razamanaz"].parse(scanz);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scanz.first == scanz.last);
+    scanz.first = cpz;
+
+    hit = shortest_d[str_p("raza") | "razaman" | "razamanaz"].parse(scanz);
+    BOOST_TEST(!!hit);
+    BOOST_TEST(scanz.first == cpz+4);
+    scanz.first = cpz;
+
+//  bounds_d
+
+    parse_info<> pr = parse("123", limit_d(0, 60)[int_p]);
+    BOOST_TEST(!pr.hit);
+
+    pr = parse("-2", limit_d(0, 60)[int_p]);
+    BOOST_TEST(!pr.hit);
+
+    pr = parse("60", limit_d(0, 60)[int_p]);
+    BOOST_TEST(pr.hit);
+
+    pr = parse("0", limit_d(0, 60)[int_p]);
+    BOOST_TEST(pr.hit);
+
+    pr = parse("-2", min_limit_d(0)[int_p]);
+    BOOST_TEST(!pr.hit);
+
+    pr = parse("-2", min_limit_d(-5)[int_p]);
+    BOOST_TEST(pr.hit);
+
+    pr = parse("101", max_limit_d(100)[int_p]);
+    BOOST_TEST(!pr.hit);
+
+    pr = parse("100", max_limit_d(100)[int_p]);
+    BOOST_TEST(pr.hit);
+}
+
+struct identifier : public grammar<identifier>
+{
+    template <typename ScannerT>
+    struct definition
+    {
+        definition(identifier const& /*self*/)
+        {
+            rr = +(alpha_p | '_');
+            r = lexeme_d[rr];
+        }
+
+        rule<typename lexeme_scanner<ScannerT>::type> rr;
+        rule<ScannerT> r;
+
+        rule<ScannerT> const&
+        start() const { return r; }
+    };
+};
+
+void
+directives_test2()
+{
+    //  Test that lexeme_d does not skip trailing spaces
+
+    std::string str1, str2;
+    identifier ident;
+
+    parse("rock_n_roll never_dies ",
+
+        ident[assign_a(str1)] >> ident[assign_a(str2)], space_p
+    );
+
+    std::cout << '*' << str1 << ',' << str2 << '*' << std::endl;
+
+
+    BOOST_TEST(str1 == "rock_n_roll");
+    BOOST_TEST(str2 == "never_dies");
+}
+
+///////////////////////////////////////////////////////////////////////////////
+//
+//  Main
+//
+///////////////////////////////////////////////////////////////////////////////
+int
+main()
+{
+    directives_test1();
+    directives_test2();
+    return boost::report_errors();
+}
+