1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
|
// Copyright Aleksey Gurtovoy 2001-2006
//
// 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)
//
// See http://www.boost.org/libs/mpl for documentation.
// $Id: integral_wrapper_test.hpp 49268 2008-10-11 06:26:17Z agurtovoy $
// $Date: 2008-10-11 02:26:17 -0400 (Sat, 11 Oct 2008) $
// $Revision: 49268 $
#include <boost/mpl/next_prior.hpp>
#include <boost/mpl/aux_/test.hpp>
#include <boost/mpl/aux_/config/workaround.hpp>
#include <cassert>
#if !BOOST_WORKAROUND(__BORLANDC__, < 0x600)
# define INTEGRAL_WRAPPER_RUNTIME_TEST(i, T) \
BOOST_TEST(( WRAPPER(T,i)() == i )); \
BOOST_TEST(( WRAPPER(T,i)::value == i )); \
/**/
#else
# define INTEGRAL_WRAPPER_RUNTIME_TEST(i, T) \
BOOST_TEST(( WRAPPER(T,i)::value == i )); \
/**/
#endif
#if BOOST_WORKAROUND(__BORLANDC__, BOOST_TESTED_AT(0x582))
// agurt 20/nov/06: see http://article.gmane.org/gmane.comp.lib.boost.devel/151065
#define INTEGRAL_WRAPPER_TEST(unused1, i, T) \
{ \
typedef WRAPPER(T,i) borland_tested_type; \
{ typedef is_same< borland_tested_type::value_type, T > borland_test_type; \
MPL_ASSERT(( borland_test_type )); } \
{ MPL_ASSERT(( is_same< borland_tested_type::type, WRAPPER(T,i) > )); } \
{ MPL_ASSERT(( is_same< next< borland_tested_type >::type, WRAPPER(T,i+1) > )); } \
{ MPL_ASSERT(( is_same< prior< borland_tested_type >::type, WRAPPER(T,i-1) > )); } \
{ MPL_ASSERT_RELATION( (borland_tested_type::value), ==, i ); } \
INTEGRAL_WRAPPER_RUNTIME_TEST(i, T) \
} \
/**/
#else
#define INTEGRAL_WRAPPER_TEST(unused1, i, T) \
{ MPL_ASSERT(( is_same< WRAPPER(T,i)::value_type, T > )); } \
{ MPL_ASSERT(( is_same< WRAPPER(T,i)::type, WRAPPER(T,i) > )); } \
{ MPL_ASSERT(( is_same< next< WRAPPER(T,i) >::type, WRAPPER(T,i+1) > )); } \
{ MPL_ASSERT(( is_same< prior< WRAPPER(T,i) >::type, WRAPPER(T,i-1) > )); } \
{ MPL_ASSERT_RELATION( (WRAPPER(T,i)::value), ==, i ); } \
INTEGRAL_WRAPPER_RUNTIME_TEST(i, T) \
/**/
#endif
|
