Chris@16: /*=============================================================================
Chris@16:     Copyright (c) 1999-2003 Jaakko Jarvi
Chris@16:     Copyright (c) 1999-2003 Jeremiah Willcock
Chris@16:     Copyright (c) 2001-2011 Joel de Guzman
Chris@16: 
Chris@16:     Distributed under the Boost Software License, Version 1.0. (See accompanying 
Chris@16:     file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
Chris@16: ==============================================================================*/
Chris@16: #if !defined(FUSION_OUT_05052005_0121)
Chris@16: #define FUSION_OUT_05052005_0121
Chris@16: 
Chris@101: #include <boost/fusion/support/config.hpp>
Chris@16: #include <ostream>
Chris@16: #include <boost/fusion/sequence/io/detail/manip.hpp>
Chris@16: 
Chris@16: #include <boost/mpl/bool.hpp>
Chris@16: #include <boost/fusion/sequence/intrinsic/begin.hpp>
Chris@16: #include <boost/fusion/sequence/intrinsic/end.hpp>
Chris@16: #include <boost/fusion/iterator/deref.hpp>
Chris@16: #include <boost/fusion/iterator/next.hpp>
Chris@16: #include <boost/fusion/iterator/equal_to.hpp>
Chris@16: 
Chris@16: namespace boost { namespace fusion { namespace detail
Chris@16: {
Chris@16:     template <typename Tag>
Chris@16:     struct delimiter_out
Chris@16:     {
Chris@16:         // print a delimiter
Chris@16:         template <typename OS>
Chris@16:         static void
Chris@16:         print(OS& os, char const* delim, mpl::false_ = mpl::false_())
Chris@16:         {
Chris@16:             detail::string_ios_manip<Tag, OS> manip(os);
Chris@16:             manip.print(delim);
Chris@16:         }
Chris@16: 
Chris@16:         template <typename OS>
Chris@16:         static void
Chris@16:         print(OS&, char const*, mpl::true_)
Chris@16:         {
Chris@16:         }
Chris@16:     };
Chris@16: 
Chris@16:     struct print_sequence_loop
Chris@16:     {
Chris@16:         template <typename OS, typename First, typename Last>
Chris@16:         static void
Chris@16:         call(OS&, First const&, Last const&, mpl::true_)
Chris@16:         {
Chris@16:         }
Chris@16: 
Chris@16:         template <typename OS, typename First, typename Last>
Chris@16:         static void
Chris@16:         call(OS& os, First const& first, Last const& last, mpl::false_)
Chris@16:         {
Chris@16:             result_of::equal_to<
Chris@16:                 typename result_of::next<First>::type
Chris@16:               , Last
Chris@16:             >
Chris@16:             is_last;
Chris@16: 
Chris@16:             os << *first;
Chris@16:             delimiter_out<tuple_delimiter_tag>::print(os, " ", is_last);
Chris@16:             call(os, fusion::next(first), last, is_last);
Chris@16:         }
Chris@16: 
Chris@16:         template <typename OS, typename First, typename Last>
Chris@16:         static void
Chris@16:         call(OS& os, First const& first, Last const& last)
Chris@16:         {
Chris@16:             result_of::equal_to<First, Last> eq;
Chris@16:             call(os, first, last, eq);
Chris@16:         }
Chris@16:     };
Chris@16: 
Chris@16:     template <typename OS, typename Sequence>
Chris@16:     inline void
Chris@16:     print_sequence(OS& os, Sequence const& seq)
Chris@16:     {
Chris@16:         delimiter_out<tuple_open_tag>::print(os, "(");
Chris@16:         print_sequence_loop::call(os, fusion::begin(seq), fusion::end(seq));
Chris@16:         delimiter_out<tuple_close_tag>::print(os, ")");
Chris@16:     }
Chris@16: }}}
Chris@16: 
Chris@16: #endif