annotate DEPENDENCIES/generic/include/boost/spirit/home/qi/directive/skip.hpp @ 133:4acb5d8d80b6 tip

Don't fail environmental check if README.md exists (but .txt and no-suffix don't)
author Chris Cannam
date Tue, 30 Jul 2019 12:25:44 +0100
parents c530137014c0
children
rev   line source
Chris@16 1 /*=============================================================================
Chris@16 2 Copyright (c) 2001-2011 Joel de Guzman
Chris@16 3
Chris@16 4 Distributed under the Boost Software License, Version 1.0. (See accompanying
Chris@16 5 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16 6 =============================================================================*/
Chris@16 7 #if !defined(SPIRIT_SKIP_JANUARY_26_2008_0422PM)
Chris@16 8 #define SPIRIT_SKIP_JANUARY_26_2008_0422PM
Chris@16 9
Chris@16 10 #if defined(_MSC_VER)
Chris@16 11 #pragma once
Chris@16 12 #endif
Chris@16 13
Chris@16 14 #include <boost/spirit/home/qi/meta_compiler.hpp>
Chris@16 15 #include <boost/spirit/home/qi/parser.hpp>
Chris@16 16 #include <boost/spirit/home/qi/auxiliary/lazy.hpp>
Chris@16 17 #include <boost/spirit/home/qi/operator/kleene.hpp>
Chris@16 18 #include <boost/spirit/home/qi/directive/lexeme.hpp>
Chris@16 19 #include <boost/spirit/home/qi/skip_over.hpp>
Chris@16 20 #include <boost/spirit/home/qi/detail/unused_skipper.hpp>
Chris@16 21 #include <boost/spirit/home/support/container.hpp>
Chris@16 22 #include <boost/spirit/home/support/common_terminals.hpp>
Chris@16 23 #include <boost/spirit/home/qi/detail/attributes.hpp>
Chris@16 24 #include <boost/spirit/home/support/info.hpp>
Chris@16 25 #include <boost/spirit/home/support/has_semantic_action.hpp>
Chris@16 26 #include <boost/spirit/home/support/handles_container.hpp>
Chris@16 27 #include <boost/fusion/include/at.hpp>
Chris@16 28 #include <boost/fusion/include/vector.hpp>
Chris@101 29 #include <boost/utility/enable_if.hpp>
Chris@16 30
Chris@16 31 namespace boost { namespace spirit
Chris@16 32 {
Chris@16 33 ///////////////////////////////////////////////////////////////////////////
Chris@16 34 // Enablers
Chris@16 35 ///////////////////////////////////////////////////////////////////////////
Chris@16 36 template <>
Chris@16 37 struct use_directive<qi::domain, tag::skip> // enables skip[p]
Chris@16 38 : mpl::true_ {};
Chris@16 39
Chris@16 40 template <typename T>
Chris@16 41 struct use_directive<qi::domain
Chris@16 42 , terminal_ex<tag::skip // enables skip(s)[p]
Chris@16 43 , fusion::vector1<T> >
Chris@16 44 > : boost::spirit::traits::matches<qi::domain, T> {};
Chris@16 45
Chris@16 46 template <> // enables *lazy* skip(s)[p]
Chris@16 47 struct use_lazy_directive<
Chris@16 48 qi::domain
Chris@16 49 , tag::skip
Chris@16 50 , 1 // arity
Chris@16 51 > : mpl::true_ {};
Chris@16 52 }}
Chris@16 53
Chris@16 54 namespace boost { namespace spirit { namespace qi
Chris@16 55 {
Chris@16 56 #ifndef BOOST_SPIRIT_NO_PREDEFINED_TERMINALS
Chris@16 57 using spirit::skip;
Chris@16 58 #endif
Chris@16 59 using spirit::skip_type;
Chris@16 60
Chris@16 61 template <typename Subject>
Chris@16 62 struct reskip_parser : unary_parser<reskip_parser<Subject> >
Chris@16 63 {
Chris@16 64 typedef Subject subject_type;
Chris@16 65
Chris@16 66 template <typename Context, typename Iterator>
Chris@16 67 struct attribute
Chris@16 68 {
Chris@16 69 typedef typename
Chris@16 70 traits::attribute_of<Subject, Context, Iterator>::type
Chris@16 71 type;
Chris@16 72 };
Chris@16 73
Chris@16 74 reskip_parser(Subject const& subject_)
Chris@16 75 : subject(subject_) {}
Chris@16 76
Chris@16 77 template <typename Iterator, typename Context
Chris@16 78 , typename Skipper, typename Attribute>
Chris@101 79 typename enable_if<detail::is_unused_skipper<Skipper>, bool>::type
Chris@101 80 parse(Iterator& first, Iterator const& last
Chris@16 81 , Context& context, Skipper const& u // --> The skipper is reintroduced
Chris@16 82 , Attribute& attr_) const
Chris@16 83 {
Chris@16 84 return subject.parse(first, last, context
Chris@16 85 , detail::get_skipper(u), attr_);
Chris@16 86 }
Chris@101 87 template <typename Iterator, typename Context
Chris@101 88 , typename Skipper, typename Attribute>
Chris@101 89 typename disable_if<detail::is_unused_skipper<Skipper>, bool>::type
Chris@101 90 parse(Iterator& first, Iterator const& last
Chris@101 91 , Context& context, Skipper const& skipper
Chris@101 92 , Attribute& attr_) const
Chris@101 93 {
Chris@101 94 return subject.parse(first, last, context
Chris@101 95 , skipper, attr_);
Chris@101 96 }
Chris@16 97
Chris@16 98 template <typename Context>
Chris@16 99 info what(Context& context) const
Chris@16 100 {
Chris@16 101 return info("skip", subject.what(context));
Chris@16 102 }
Chris@16 103
Chris@16 104 Subject subject;
Chris@16 105 };
Chris@16 106
Chris@16 107 template <typename Subject, typename Skipper>
Chris@16 108 struct skip_parser : unary_parser<skip_parser<Subject, Skipper> >
Chris@16 109 {
Chris@16 110 typedef Subject subject_type;
Chris@16 111 typedef Skipper skipper_type;
Chris@16 112
Chris@16 113 template <typename Context, typename Iterator>
Chris@16 114 struct attribute
Chris@16 115 {
Chris@16 116 typedef typename
Chris@16 117 traits::attribute_of<Subject, Context, Iterator>::type
Chris@16 118 type;
Chris@16 119 };
Chris@16 120
Chris@16 121 skip_parser(Subject const& subject_, Skipper const& skipper_)
Chris@16 122 : subject(subject_), skipper(skipper_) {}
Chris@16 123
Chris@16 124 template <typename Iterator, typename Context
Chris@16 125 , typename Skipper_, typename Attribute>
Chris@16 126 bool parse(Iterator& first, Iterator const& last
Chris@16 127 , Context& context, Skipper_ const& //skipper --> bypass the supplied skipper
Chris@16 128 , Attribute& attr_) const
Chris@16 129 {
Chris@16 130 return subject.parse(first, last, context, skipper, attr_);
Chris@16 131 }
Chris@16 132
Chris@16 133 template <typename Context>
Chris@16 134 info what(Context& context) const
Chris@16 135 {
Chris@16 136 return info("skip", subject.what(context));
Chris@16 137 }
Chris@16 138
Chris@16 139 Subject subject;
Chris@16 140 Skipper skipper;
Chris@16 141 };
Chris@16 142
Chris@16 143 ///////////////////////////////////////////////////////////////////////////
Chris@16 144 // Parser generators: make_xxx function (objects)
Chris@16 145 ///////////////////////////////////////////////////////////////////////////
Chris@16 146 template <typename Subject, typename Modifiers>
Chris@16 147 struct make_directive<tag::skip, Subject, Modifiers>
Chris@16 148 {
Chris@16 149 typedef reskip_parser<Subject> result_type;
Chris@16 150 result_type operator()(unused_type, Subject const& subject, unused_type) const
Chris@16 151 {
Chris@16 152 return result_type(subject);
Chris@16 153 }
Chris@16 154 };
Chris@16 155
Chris@16 156 template <typename Skipper, typename Subject, typename Modifiers>
Chris@16 157 struct make_directive<
Chris@16 158 terminal_ex<tag::skip, fusion::vector1<Skipper> >, Subject, Modifiers>
Chris@16 159 {
Chris@16 160 typedef typename
Chris@16 161 result_of::compile<qi::domain, Skipper, Modifiers>::type
Chris@16 162 skipper_type;
Chris@16 163
Chris@16 164 typedef skip_parser<Subject, skipper_type> result_type;
Chris@16 165
Chris@16 166 template <typename Terminal>
Chris@16 167 result_type operator()(Terminal const& term, Subject const& subject
Chris@16 168 , Modifiers const& modifiers) const
Chris@16 169 {
Chris@16 170 return result_type(subject
Chris@16 171 , compile<qi::domain>(fusion::at_c<0>(term.args), modifiers));
Chris@16 172 }
Chris@16 173 };
Chris@16 174
Chris@16 175 }}}
Chris@16 176
Chris@16 177 namespace boost { namespace spirit { namespace traits
Chris@16 178 {
Chris@16 179 ///////////////////////////////////////////////////////////////////////////
Chris@16 180 template <typename Subject>
Chris@16 181 struct has_semantic_action<qi::reskip_parser<Subject> >
Chris@16 182 : unary_has_semantic_action<Subject> {};
Chris@16 183
Chris@16 184 template <typename Subject, typename Skipper>
Chris@16 185 struct has_semantic_action<qi::skip_parser<Subject, Skipper> >
Chris@16 186 : unary_has_semantic_action<Subject> {};
Chris@16 187
Chris@16 188 ///////////////////////////////////////////////////////////////////////////
Chris@16 189 template <typename Subject, typename Attribute, typename Context
Chris@16 190 , typename Iterator>
Chris@16 191 struct handles_container<qi::reskip_parser<Subject>, Attribute
Chris@16 192 , Context, Iterator>
Chris@16 193 : unary_handles_container<Subject, Attribute, Context, Iterator> {};
Chris@16 194
Chris@16 195 template <typename Subject, typename Skipper, typename Attribute
Chris@16 196 , typename Context, typename Iterator>
Chris@16 197 struct handles_container<qi::skip_parser<Subject, Skipper>, Attribute
Chris@16 198 , Context, Iterator>
Chris@16 199 : unary_handles_container<Subject, Attribute, Context, Iterator> {};
Chris@16 200 }}}
Chris@16 201
Chris@16 202 #endif