fixing stuff
[dyninst.git] / dynutil / h / dyn_detail / boost / mpl / aux_ / integral_wrapper.hpp
1
2 // Copyright Aleksey Gurtovoy 2000-2006
3 //
4 // Distributed under the Boost Software License, Version 1.0. 
5 // (See accompanying file LICENSE_1_0.txt or copy at 
6 // http://www.boost.org/LICENSE_1_0.txt)
7 //
8 // See http://www.boost.org/libs/mpl for documentation.
9
10 // $Id: integral_wrapper.hpp 49267 2008-10-11 06:19:02Z agurtovoy $
11 // $Date: 2008-10-11 02:19:02 -0400 (Sat, 11 Oct 2008) $
12 // $Revision: 49267 $
13
14 // NO INCLUDE GUARDS, THE HEADER IS INTENDED FOR MULTIPLE INCLUSION!
15
16 #include <dyn_detail/boost/mpl/integral_c_tag.hpp>
17 #include <dyn_detail/boost/mpl/aux_/static_cast.hpp>
18 #include <dyn_detail/boost/mpl/aux_/nttp_decl.hpp>
19 #include <dyn_detail/boost/mpl/aux_/config/static_constant.hpp>
20 #include <dyn_detail/boost/mpl/aux_/config/workaround.hpp>
21
22 #include <dyn_detail/boost/preprocessor/cat.hpp>
23
24 #if !defined(AUX_WRAPPER_NAME)
25 #   define AUX_WRAPPER_NAME DYN_DETAIL_BOOST_PP_CAT(AUX_WRAPPER_VALUE_TYPE,_)
26 #endif
27
28 #if !defined(AUX_WRAPPER_PARAMS)
29 #   define AUX_WRAPPER_PARAMS(N) DYN_DETAIL_BOOST_MPL_AUX_NTTP_DECL(AUX_WRAPPER_VALUE_TYPE, N)
30 #endif
31
32 #if !defined(AUX_WRAPPER_INST)
33 #   if DYN_DETAIL_BOOST_WORKAROUND(__MWERKS__, <= 0x2407)
34 #       define AUX_WRAPPER_INST(value) AUX_WRAPPER_NAME< value >
35 #   else 
36 #       define AUX_WRAPPER_INST(value) DYN_DETAIL_BOOST_MPL_AUX_ADL_BARRIER_NAMESPACE::AUX_WRAPPER_NAME< value >
37 #   endif
38 #endif
39
40 namespace dyn_detail {
41
42 DYN_DETAIL_BOOST_MPL_AUX_ADL_BARRIER_NAMESPACE_OPEN
43
44 template< AUX_WRAPPER_PARAMS(N) >
45 struct AUX_WRAPPER_NAME
46 {
47     DYN_DETAIL_BOOST_STATIC_CONSTANT(AUX_WRAPPER_VALUE_TYPE, value = N);
48 // agurt, 08/mar/03: SGI MIPSpro C++ workaround, have to #ifdef because some 
49 // other compilers (e.g. MSVC) are not particulary happy about it
50 #if DYN_DETAIL_BOOST_WORKAROUND(__EDG_VERSION__, <= 238)
51     typedef struct AUX_WRAPPER_NAME type;
52 #else
53     typedef AUX_WRAPPER_NAME type;
54 #endif
55     typedef AUX_WRAPPER_VALUE_TYPE value_type;
56     typedef integral_c_tag tag;
57
58 // have to #ifdef here: some compilers don't like the 'N + 1' form (MSVC),
59 // while some other don't like 'value + 1' (Borland), and some don't like
60 // either
61 #if DYN_DETAIL_BOOST_WORKAROUND(__EDG_VERSION__, <= 243)
62  private:
63     DYN_DETAIL_BOOST_STATIC_CONSTANT(AUX_WRAPPER_VALUE_TYPE, next_value = DYN_DETAIL_BOOST_MPL_AUX_STATIC_CAST(AUX_WRAPPER_VALUE_TYPE, (N + 1)));
64     DYN_DETAIL_BOOST_STATIC_CONSTANT(AUX_WRAPPER_VALUE_TYPE, prior_value = DYN_DETAIL_BOOST_MPL_AUX_STATIC_CAST(AUX_WRAPPER_VALUE_TYPE, (N - 1)));
65  public:
66     typedef AUX_WRAPPER_INST(next_value) next;
67     typedef AUX_WRAPPER_INST(prior_value) prior;
68 #elif DYN_DETAIL_BOOST_WORKAROUND(__BORLANDC__, DYN_DETAIL_BOOST_TESTED_AT(0x561)) \
69     || DYN_DETAIL_BOOST_WORKAROUND(__IBMCPP__, DYN_DETAIL_BOOST_TESTED_AT(502)) \
70     || (DYN_DETAIL_BOOST_WORKAROUND(__HP_aCC, <= 53800) && (DYN_DETAIL_BOOST_WORKAROUND(__hpxstd98, != 1)))
71     typedef AUX_WRAPPER_INST( DYN_DETAIL_BOOST_MPL_AUX_STATIC_CAST(AUX_WRAPPER_VALUE_TYPE, (N + 1)) ) next;
72     typedef AUX_WRAPPER_INST( DYN_DETAIL_BOOST_MPL_AUX_STATIC_CAST(AUX_WRAPPER_VALUE_TYPE, (N - 1)) ) prior;
73 #else
74     typedef AUX_WRAPPER_INST( DYN_DETAIL_BOOST_MPL_AUX_STATIC_CAST(AUX_WRAPPER_VALUE_TYPE, (value + 1)) ) next;
75     typedef AUX_WRAPPER_INST( DYN_DETAIL_BOOST_MPL_AUX_STATIC_CAST(AUX_WRAPPER_VALUE_TYPE, (value - 1)) ) prior;
76 #endif
77
78     // enables uniform function call syntax for families of overloaded 
79     // functions that return objects of both arithmetic ('int', 'long',
80     // 'double', etc.) and wrapped integral types (for an example, see 
81     // "mpl/example/power.cpp")
82     operator AUX_WRAPPER_VALUE_TYPE() const { return static_cast<AUX_WRAPPER_VALUE_TYPE>(this->value); } 
83 };
84
85 #if !defined(DYN_DETAIL_BOOST_NO_INCLASS_MEMBER_INITIALIZATION)
86 template< AUX_WRAPPER_PARAMS(N) >
87 AUX_WRAPPER_VALUE_TYPE const AUX_WRAPPER_INST(N)::value;
88 #endif
89
90 DYN_DETAIL_BOOST_MPL_AUX_ADL_BARRIER_NAMESPACE_CLOSE
91
92 } // namespace dyn_detail
93 #undef AUX_WRAPPER_NAME
94 #undef AUX_WRAPPER_PARAMS
95 #undef AUX_WRAPPER_INST
96 #undef AUX_WRAPPER_VALUE_TYPE