| // Copyright (c) 2001-2010 Hartmut Kaiser |
| // |
| // Distributed under 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) |
| |
| #if !defined(BOOST_SPIRIT_KARMA_VERBATIM_MAR_02_2007_0303PM) |
| #define BOOST_SPIRIT_KARMA_VERBATIM_MAR_02_2007_0303PM |
| |
| #if defined(_MSC_VER) |
| #pragma once |
| #endif |
| |
| #include <boost/spirit/home/karma/meta_compiler.hpp> |
| #include <boost/spirit/home/karma/generator.hpp> |
| #include <boost/spirit/home/karma/domain.hpp> |
| #include <boost/spirit/home/karma/detail/unused_delimiter.hpp> |
| #include <boost/spirit/home/karma/delimit_out.hpp> |
| #include <boost/spirit/home/karma/auxiliary/lazy.hpp> |
| #include <boost/spirit/home/support/unused.hpp> |
| #include <boost/spirit/home/support/common_terminals.hpp> |
| #include <boost/spirit/home/karma/detail/attributes.hpp> |
| #include <boost/spirit/home/support/info.hpp> |
| |
| namespace boost { namespace spirit |
| { |
| /////////////////////////////////////////////////////////////////////////// |
| // Enablers |
| /////////////////////////////////////////////////////////////////////////// |
| template <> |
| struct use_directive<karma::domain, tag::verbatim> // enables verbatim[] |
| : mpl::true_ {}; |
| |
| }} |
| |
| namespace boost { namespace spirit { namespace karma |
| { |
| using spirit::verbatim; |
| using spirit::verbatim_type; |
| |
| /////////////////////////////////////////////////////////////////////////// |
| // The verbatim generator is used for verbatim[...] directives. |
| /////////////////////////////////////////////////////////////////////////// |
| template <typename Subject> |
| struct verbatim_generator : unary_generator<verbatim_generator<Subject> > |
| { |
| typedef Subject subject_type; |
| typedef typename subject_type::properties properties; |
| |
| template <typename Context, typename Iterator> |
| struct attribute |
| : traits::attribute_of<subject_type, Context, Iterator> |
| {}; |
| |
| verbatim_generator(Subject const& subject) |
| : subject(subject) {} |
| |
| template <typename OutputIterator, typename Context, typename Delimiter |
| , typename Attribute> |
| bool generate(OutputIterator& sink, Context& ctx, Delimiter const& d |
| , Attribute const& attr) const |
| { |
| // the verbatim generator simply dispatches to the embedded |
| // generator while supplying unused_delimiter as the new delimiter |
| // to avoid delimiting down the generator stream |
| typedef detail::unused_delimiter<Delimiter> unused_delimiter; |
| |
| return subject.generate(sink, ctx, unused_delimiter(d), attr) && |
| karma::delimit_out(sink, d); // always do post-delimiting |
| } |
| |
| template <typename Context> |
| info what(Context& context) const |
| { |
| return info("verbatim", subject.what(context)); |
| } |
| |
| Subject subject; |
| }; |
| |
| /////////////////////////////////////////////////////////////////////////// |
| // Generator generators: make_xxx function (objects) |
| /////////////////////////////////////////////////////////////////////////// |
| template <typename Subject, typename Modifiers> |
| struct make_directive<tag::verbatim, Subject, Modifiers> |
| { |
| typedef verbatim_generator<Subject> result_type; |
| result_type operator()(unused_type, Subject const& subject, unused_type) const |
| { |
| return result_type(subject); |
| } |
| }; |
| |
| }}} |
| |
| namespace boost { namespace spirit { namespace traits |
| { |
| template <typename Subject> |
| struct has_semantic_action<karma::verbatim_generator<Subject> > |
| : unary_has_semantic_action<Subject> {}; |
| |
| }}} |
| |
| #endif |