mirror of
https://github.com/geode-sdk/geode.git
synced 2024-12-04 13:11:09 -05:00
68 lines
1.7 KiB
C++
68 lines
1.7 KiB
C++
|
// Copyright (c) 2014-2022 Dr. Colin Hirsch and Daniel Frey
|
||
|
|
// Please see LICENSE for license or visit https://github.com/taocpp/PEGTL/
|
||
|
|
|
||
|
|
#ifndef TAO_PEGTL_INTERNAL_REP_HPP
|
||
|
|
#define TAO_PEGTL_INTERNAL_REP_HPP
|
||
|
|
|
||
|
|
#include "../config.hpp"
|
||
|
|
|
||
|
|
#include "enable_control.hpp"
|
||
|
|
#include "seq.hpp"
|
||
|
|
#include "success.hpp"
|
||
|
|
|
||
|
|
#include "../apply_mode.hpp"
|
||
|
|
#include "../rewind_mode.hpp"
|
||
|
|
#include "../type_list.hpp"
|
||
|
|
|
||
|
|
namespace TAO_PEGTL_NAMESPACE::internal
|
||
|
|
{
|
||
|
|
template< unsigned Cnt, typename... Rules >
|
||
|
|
struct rep
|
||
|
|
: rep< Cnt, seq< Rules... > >
|
||
|
|
{};
|
||
|
|
|
||
|
|
template< unsigned Cnt >
|
||
|
|
struct rep< Cnt >
|
||
|
|
: success
|
||
|
|
{};
|
||
|
|
|
||
|
|
template< typename Rule >
|
||
|
|
struct rep< 0, Rule >
|
||
|
|
: success
|
||
|
|
{};
|
||
|
|
|
||
|
|
template< unsigned Cnt, typename Rule >
|
||
|
|
struct rep< Cnt, Rule >
|
||
|
|
{
|
||
|
|
using rule_t = rep;
|
||
|
|
using subs_t = type_list< Rule >;
|
||
|
|
|
||
|
|
template< apply_mode A,
|
||
|
|
rewind_mode M,
|
||
|
|
template< typename... >
|
||
|
|
class Action,
|
||
|
|
template< typename... >
|
||
|
|
class Control,
|
||
|
|
typename ParseInput,
|
||
|
|
typename... States >
|
||
|
|
[[nodiscard]] static bool match( ParseInput& in, States&&... st )
|
||
|
|
{
|
||
|
|
auto m = in.template mark< M >();
|
||
|
|
using m_t = decltype( m );
|
||
|
|
|
||
|
|
for( unsigned i = 0; i != Cnt; ++i ) {
|
||
|
|
if( !Control< Rule >::template match< A, m_t::next_rewind_mode, Action, Control >( in, st... ) ) {
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return m( true );
|
||
|
|
}
|
||
|
|
};
|
||
|
|
|
||
|
|
template< unsigned Cnt, typename... Rules >
|
||
|
|
inline constexpr bool enable_control< rep< Cnt, Rules... > > = false;
|
||
|
|
|
||
|
|
} // namespace TAO_PEGTL_NAMESPACE::internal
|
||
|
|
|
||
|
|
#endif
|