Chris@102
|
1 /*=============================================================================
|
Chris@102
|
2 Copyright (c) 2001-2014 Joel de Guzman
|
Chris@102
|
3
|
Chris@102
|
4 Distributed under the Boost Software License, Version 1.0. (See accompanying
|
Chris@102
|
5 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
Chris@102
|
6 =============================================================================*/
|
Chris@102
|
7 #if !defined(SPIRIT_LEXEME_MARCH_24_2007_0802AM)
|
Chris@102
|
8 #define SPIRIT_LEXEME_MARCH_24_2007_0802AM
|
Chris@102
|
9
|
Chris@102
|
10 #if defined(_MSC_VER)
|
Chris@102
|
11 #pragma once
|
Chris@102
|
12 #endif
|
Chris@102
|
13
|
Chris@102
|
14 #include <boost/spirit/home/x3/support/context.hpp>
|
Chris@102
|
15 #include <boost/spirit/home/x3/support/unused.hpp>
|
Chris@102
|
16 #include <boost/spirit/home/x3/core/skip_over.hpp>
|
Chris@102
|
17 #include <boost/spirit/home/x3/core/parser.hpp>
|
Chris@102
|
18 #include <boost/type_traits/remove_reference.hpp>
|
Chris@102
|
19 #include <boost/utility/enable_if.hpp>
|
Chris@102
|
20
|
Chris@102
|
21 namespace boost { namespace spirit { namespace x3
|
Chris@102
|
22 {
|
Chris@102
|
23 template <typename Subject>
|
Chris@102
|
24 struct lexeme_directive : unary_parser<Subject, lexeme_directive<Subject>>
|
Chris@102
|
25 {
|
Chris@102
|
26 typedef unary_parser<Subject, lexeme_directive<Subject> > base_type;
|
Chris@102
|
27 static bool const is_pass_through_unary = true;
|
Chris@102
|
28 static bool const handles_container = Subject::handles_container;
|
Chris@102
|
29
|
Chris@102
|
30 lexeme_directive(Subject const& subject)
|
Chris@102
|
31 : base_type(subject) {}
|
Chris@102
|
32
|
Chris@102
|
33 template <typename Iterator, typename Context
|
Chris@102
|
34 , typename RContext, typename Attribute>
|
Chris@102
|
35 typename enable_if<has_skipper<Context>, bool>::type
|
Chris@102
|
36 parse(Iterator& first, Iterator const& last
|
Chris@102
|
37 , Context const& context, RContext& rcontext, Attribute& attr) const
|
Chris@102
|
38 {
|
Chris@102
|
39 x3::skip_over(first, last, context);
|
Chris@102
|
40 auto const& skipper = x3::get<skipper_tag>(context);
|
Chris@102
|
41
|
Chris@102
|
42 typedef unused_skipper<
|
Chris@102
|
43 typename remove_reference<decltype(skipper)>::type>
|
Chris@102
|
44 unused_skipper_type;
|
Chris@102
|
45 unused_skipper_type unused_skipper(skipper);
|
Chris@102
|
46
|
Chris@102
|
47 return this->subject.parse(
|
Chris@102
|
48 first, last
|
Chris@102
|
49 , make_context<skipper_tag>(unused_skipper, context)
|
Chris@102
|
50 , rcontext
|
Chris@102
|
51 , attr);
|
Chris@102
|
52 }
|
Chris@102
|
53
|
Chris@102
|
54 template <typename Iterator, typename Context
|
Chris@102
|
55 , typename RContext, typename Attribute>
|
Chris@102
|
56 typename disable_if<has_skipper<Context>, bool>::type
|
Chris@102
|
57 parse(Iterator& first, Iterator const& last
|
Chris@102
|
58 , Context const& context, RContext& rcontext, Attribute& attr) const
|
Chris@102
|
59 {
|
Chris@102
|
60 // no need to pre-skip if skipper is unused
|
Chris@102
|
61 //- x3::skip_over(first, last, context);
|
Chris@102
|
62
|
Chris@102
|
63 return this->subject.parse(
|
Chris@102
|
64 first, last
|
Chris@102
|
65 , context
|
Chris@102
|
66 , rcontext
|
Chris@102
|
67 , attr);
|
Chris@102
|
68 }
|
Chris@102
|
69 };
|
Chris@102
|
70
|
Chris@102
|
71 struct lexeme_gen
|
Chris@102
|
72 {
|
Chris@102
|
73 template <typename Subject>
|
Chris@102
|
74 lexeme_directive<typename extension::as_parser<Subject>::value_type>
|
Chris@102
|
75 operator[](Subject const& subject) const
|
Chris@102
|
76 {
|
Chris@102
|
77 return {as_parser(subject)};
|
Chris@102
|
78 }
|
Chris@102
|
79 };
|
Chris@102
|
80
|
Chris@102
|
81 lexeme_gen const lexeme = lexeme_gen();
|
Chris@102
|
82 }}}
|
Chris@102
|
83
|
Chris@102
|
84 #endif
|