The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
/*=============================================================================
    Copyright (c) 2003 Joel de Guzman
    Copyright (c) 2004 Peder Holt

    Use, modification and distribution is subject to 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(FUSION_SEQUENCE_DETAIL_SEQUENCE_BASE_HPP)
#define FUSION_SEQUENCE_DETAIL_SEQUENCE_BASE_HPP

namespace boost { namespace fusion
{
    struct sequence_root {};

    template <typename Sequence>
    struct sequence_base : sequence_root
    {
        Sequence const&
        cast() const;

        Sequence&
        cast();
    };

    template <typename Sequence>
    Sequence const&
    sequence_base<Sequence>::cast() const
    {
        return static_cast<Sequence const&>(*this);
    }

    template <typename Sequence>
    Sequence&
    sequence_base<Sequence>::cast()
    {
        return static_cast<Sequence&>(*this);
    }

}}

#endif