ceph/src/boost/boost/local_function/aux_/preprocessor/traits/decl_sign_/any_bind_type.hpp

   1
   2 // Copyright (C) 2009-2012 Lorenzo Caminiti
   3 // Distributed under the Boost Software License, Version 1.0
   4 // (see accompanying file LICENSE_1_0.txt or a copy at
   5 // http://www.boost.org/LICENSE_1_0.txt)
   6 // Home at http://www.boost.org/libs/local_function
   7
   8 #ifndef BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_TYPE_HPP_
   9 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_TYPE_HPP_
  10
  11 #include <boost/local_function/detail/preprocessor/keyword/const_bind.hpp>
  12 #include <boost/local_function/detail/preprocessor/keyword/this.hpp>
  13 #include <boost/preprocessor/cat.hpp>
  14 #include <boost/preprocessor/control/iif.hpp>
  15 #include <boost/preprocessor/facilities/empty.hpp>
  16 #include <boost/preprocessor/facilities/expand.hpp>
  17 #include <boost/preprocessor/tuple/eat.hpp>
  18 #include <boost/preprocessor/tuple/rem.hpp>
  19 #include <boost/preprocessor/detail/is_unary.hpp>
  20
  21 // PRIVATE //
  22
  23 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_WITH_TYPE_(sign) \
  24     /* using PP_EXPAND here does not work on MSVC */ \
  25     BOOST_PP_TUPLE_REM(1) \
  26     BOOST_LOCAL_FUNCTION_DETAIL_PP_KEYWORD_CONST_BIND_REMOVE_FRONT(sign) \
  27     BOOST_PP_EMPTY /* always trail EMPTY because bind type is optional */
  28
  29 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_WITHOUT_TYPE_( \
  30         sign) \
  31     /* using PP_EXPAND here does not work on MSVC */ \
  32     BOOST_PP_TUPLE_EAT(1) \
  33     BOOST_LOCAL_FUNCTION_DETAIL_PP_KEYWORD_CONST_BIND_REMOVE_FRONT(sign)
  34
  35 #define this_BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_REMOVE_THIS_ \
  36     /* must expand to nothing */
  37
  38 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_THIS_TYPE_(sign) \
  39     BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_WITH_TYPE( \
  40         /* can't use `THISUNDERSCIRE_REMOVE_BACK` because `sign` contains */ \
  41         /* multiple tokens (and not just one token) so */ \
  42         /* `IS_THISUNDERSCORE_BACK` does not work (but we know `sign` ends */ \
  43         /* with this_ if we here so we can manually force the removal using */ \
  44         BOOST_PP_CAT(sign, \
  45                 BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_REMOVE_THIS_) \
  46     ) \
  47     /* do not append PP_EMPTY because ANY_BIND_WITH_TYPE macro above */ \
  48     /* already appends it */
  49
  50 // PUBLIC //
  51
  52 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_HAS_TYPE(sign) \
  53     BOOST_PP_IS_UNARY( \
  54             BOOST_LOCAL_FUNCTION_DETAIL_PP_KEYWORD_CONST_BIND_REMOVE_FRONT( \
  55                     sign))
  56
  57 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_WITH_TYPE(sign) \
  58     BOOST_PP_IIF( \
  59             BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_HAS_TYPE( \
  60                     sign),\
  61         BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_WITH_TYPE_ \
  62     , \
  63         BOOST_PP_EMPTY \
  64         BOOST_PP_TUPLE_EAT(1) \
  65     )(sign)
  66
  67 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_WITHOUT_TYPE( \
  68         sign) \
  69     BOOST_PP_IIF( \
  70             BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_HAS_TYPE( \
  71                     sign),\
  72         BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_WITHOUT_TYPE_ \
  73     , \
  74         BOOST_LOCAL_FUNCTION_DETAIL_PP_KEYWORD_CONST_BIND_REMOVE_FRONT \
  75     )(sign)
  76
  77 #define BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_THIS_TYPE(sign) \
  78     BOOST_PP_IIF( \
  79             BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_HAS_TYPE( \
  80                     sign),\
  81         BOOST_LOCAL_FUNCTION_AUX_PP_DECL_TRAITS_SIGN_ANY_BIND_THIS_TYPE_ \
  82     , \
  83         BOOST_PP_EMPTY \
  84         BOOST_PP_TUPLE_EAT(1) \
  85     )(sign)
  86
  87 #endif // #include guard
  88