
//  (C) Copyright Edward Diener 2011-2015
//  Use, modification and distribution are 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).

#include <boost/vmd/seq/is_vmd_seq.hpp>
#include <boost/preprocessor/tuple/elem.hpp>
#include <boost/detail/lightweight_test.hpp>

int main()
  {
  
#if BOOST_PP_VARIADICS

  #define ATUPLE (0,1,2,3,((VMD_TEST_88_,VMD_TEST_1_))((VMD_TEST_99_,VMD_TEST_3_))((VMD_TEST_2_))((VMD_TEST_99_,VMD_TEST_100_,VMD_TEST_101_)))
  #define AN_EMPTY_VMD_SEQ
  
#if !BOOST_VMD_MSVC_V8  

  #define AN_EMPTY_SEQ ()

#endif

  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ());
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ(AN_EMPTY_VMD_SEQ));
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ((x)));
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ((x)(y)));
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ((x)(y)(z)(2)(3)(4)));
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ((x)(y)(z)((1,2))(3)(4)));
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ((x)(y)(z)((1,2))(3)((4,(x,BOOST_PP_NIL)))));
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ((x)(y)((x)(y)(z)(2)(3)(4))((1,2))(3)((4,(x,BOOST_PP_NIL)))));
  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ(BOOST_PP_TUPLE_ELEM(4,ATUPLE)));
  
#if !BOOST_VMD_MSVC_V8  

  BOOST_TEST(BOOST_VMD_IS_VMD_SEQ(AN_EMPTY_SEQ));

#endif

#else

BOOST_ERROR("No variadic macro support");
  
#endif

  return boost::report_errors();
  
  }
