Chris@16
|
1 /*=============================================================================
|
Chris@16
|
2 Copyright (c) 2001-2011 Joel de Guzman
|
Chris@16
|
3 Copyright (c) 2001-2011 Hartmut Kaiser
|
Chris@16
|
4
|
Chris@16
|
5 Distributed under the Boost Software License, Version 1.0. (See accompanying
|
Chris@16
|
6 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
7 =============================================================================*/
|
Chris@16
|
8 #if !defined(SPIRIT_KLEENE_JANUARY_07_2007_0818AM)
|
Chris@16
|
9 #define SPIRIT_KLEENE_JANUARY_07_2007_0818AM
|
Chris@16
|
10
|
Chris@16
|
11 #if defined(_MSC_VER)
|
Chris@16
|
12 #pragma once
|
Chris@16
|
13 #endif
|
Chris@16
|
14
|
Chris@16
|
15 #include <boost/spirit/home/qi/meta_compiler.hpp>
|
Chris@16
|
16 #include <boost/spirit/home/qi/parser.hpp>
|
Chris@16
|
17 #include <boost/spirit/home/support/container.hpp>
|
Chris@16
|
18 #include <boost/spirit/home/qi/detail/attributes.hpp>
|
Chris@16
|
19 #include <boost/spirit/home/qi/detail/fail_function.hpp>
|
Chris@16
|
20 #include <boost/spirit/home/qi/detail/pass_container.hpp>
|
Chris@16
|
21 #include <boost/spirit/home/support/has_semantic_action.hpp>
|
Chris@16
|
22 #include <boost/spirit/home/support/handles_container.hpp>
|
Chris@16
|
23 #include <boost/spirit/home/support/info.hpp>
|
Chris@16
|
24
|
Chris@16
|
25 namespace boost { namespace spirit
|
Chris@16
|
26 {
|
Chris@16
|
27 ///////////////////////////////////////////////////////////////////////////
|
Chris@16
|
28 // Enablers
|
Chris@16
|
29 ///////////////////////////////////////////////////////////////////////////
|
Chris@16
|
30 //[composite_parsers_kleene_enable_
|
Chris@16
|
31 template <>
|
Chris@16
|
32 struct use_operator<qi::domain, proto::tag::dereference> // enables *p
|
Chris@16
|
33 : mpl::true_ {};
|
Chris@16
|
34 //]
|
Chris@16
|
35 }}
|
Chris@16
|
36
|
Chris@16
|
37 namespace boost { namespace spirit { namespace qi
|
Chris@16
|
38 {
|
Chris@16
|
39 //[composite_parsers_kleene
|
Chris@16
|
40 template <typename Subject>
|
Chris@16
|
41 struct kleene : unary_parser<kleene<Subject> >
|
Chris@16
|
42 {
|
Chris@16
|
43 typedef Subject subject_type;
|
Chris@16
|
44
|
Chris@16
|
45 template <typename Context, typename Iterator>
|
Chris@16
|
46 struct attribute
|
Chris@16
|
47 {
|
Chris@16
|
48 // Build a std::vector from the subject's attribute. Note
|
Chris@16
|
49 // that build_std_vector may return unused_type if the
|
Chris@16
|
50 // subject's attribute is an unused_type.
|
Chris@16
|
51 typedef typename
|
Chris@16
|
52 traits::build_std_vector<
|
Chris@16
|
53 typename traits::
|
Chris@16
|
54 attribute_of<Subject, Context, Iterator>::type
|
Chris@16
|
55 >::type
|
Chris@16
|
56 type;
|
Chris@16
|
57 };
|
Chris@16
|
58
|
Chris@16
|
59 kleene(Subject const& subject_)
|
Chris@16
|
60 : subject(subject_) {}
|
Chris@16
|
61
|
Chris@16
|
62 template <typename F>
|
Chris@16
|
63 bool parse_container(F f) const
|
Chris@16
|
64 {
|
Chris@16
|
65 while (!f (subject))
|
Chris@16
|
66 ;
|
Chris@16
|
67 return true;
|
Chris@16
|
68 }
|
Chris@16
|
69
|
Chris@16
|
70 template <typename Iterator, typename Context
|
Chris@16
|
71 , typename Skipper, typename Attribute>
|
Chris@16
|
72 bool parse(Iterator& first, Iterator const& last
|
Chris@16
|
73 , Context& context, Skipper const& skipper
|
Chris@16
|
74 , Attribute& attr_) const
|
Chris@16
|
75 {
|
Chris@16
|
76 // ensure the attribute is actually a container type
|
Chris@16
|
77 traits::make_container(attr_);
|
Chris@16
|
78
|
Chris@16
|
79 typedef detail::fail_function<Iterator, Context, Skipper>
|
Chris@16
|
80 fail_function;
|
Chris@16
|
81
|
Chris@16
|
82 Iterator iter = first;
|
Chris@16
|
83 fail_function f(iter, last, context, skipper);
|
Chris@16
|
84 parse_container(detail::make_pass_container(f, attr_));
|
Chris@16
|
85
|
Chris@16
|
86 first = f.first;
|
Chris@16
|
87 return true;
|
Chris@16
|
88 }
|
Chris@16
|
89
|
Chris@16
|
90 template <typename Context>
|
Chris@16
|
91 info what(Context& context) const
|
Chris@16
|
92 {
|
Chris@16
|
93 return info("kleene", subject.what(context));
|
Chris@16
|
94 }
|
Chris@16
|
95
|
Chris@16
|
96 Subject subject;
|
Chris@16
|
97 };
|
Chris@16
|
98 //]
|
Chris@16
|
99
|
Chris@16
|
100 ///////////////////////////////////////////////////////////////////////////
|
Chris@16
|
101 // Parser generators: make_xxx function (objects)
|
Chris@16
|
102 ///////////////////////////////////////////////////////////////////////////
|
Chris@16
|
103 //[composite_parsers_kleene_generator
|
Chris@16
|
104 template <typename Elements, typename Modifiers>
|
Chris@16
|
105 struct make_composite<proto::tag::dereference, Elements, Modifiers>
|
Chris@16
|
106 : make_unary_composite<Elements, kleene>
|
Chris@16
|
107 {};
|
Chris@16
|
108 //]
|
Chris@16
|
109
|
Chris@16
|
110 // ///////////////////////////////////////////////////////////////////////////
|
Chris@16
|
111 // // Define what attributes are compatible with a kleene
|
Chris@16
|
112 // template <typename Attribute, typename Subject, typename Context, typename Iterator>
|
Chris@16
|
113 // struct is_attribute_compatible<Attribute, kleene<Subject>, Context, Iterator>
|
Chris@16
|
114 // : traits::is_container_compatible<qi::domain, Attribute
|
Chris@16
|
115 // , kleene<Subject>, Context, Iterator>
|
Chris@16
|
116 // {};
|
Chris@16
|
117 }}}
|
Chris@16
|
118
|
Chris@16
|
119 namespace boost { namespace spirit { namespace traits
|
Chris@16
|
120 {
|
Chris@16
|
121 ///////////////////////////////////////////////////////////////////////////
|
Chris@16
|
122 template <typename Subject>
|
Chris@16
|
123 struct has_semantic_action<qi::kleene<Subject> >
|
Chris@16
|
124 : unary_has_semantic_action<Subject> {};
|
Chris@16
|
125
|
Chris@16
|
126 ///////////////////////////////////////////////////////////////////////////
|
Chris@16
|
127 template <typename Subject, typename Attribute, typename Context
|
Chris@16
|
128 , typename Iterator>
|
Chris@16
|
129 struct handles_container<qi::kleene<Subject>, Attribute
|
Chris@16
|
130 , Context, Iterator>
|
Chris@16
|
131 : mpl::true_ {};
|
Chris@16
|
132 }}}
|
Chris@16
|
133
|
Chris@16
|
134 #endif
|