1# /* Copyright (C) 2001 2# * Housemarque Oy 3# * http://www.housemarque.com 4# * 5# * Distributed under the Boost Software License, Version 1.0. (See 6# * accompanying file LICENSE_1_0.txt or copy at 7# * http://www.boost.org/LICENSE_1_0.txt) 8# */ 9# 10# /* Revised by Paul Mensonides (2002) */ 11# 12# /* See http://www.boost.org for most recent version. */ 13# 14# ifndef MSGPACK_PREPROCESSOR_LIST_TRANSFORM_HPP 15# define MSGPACK_PREPROCESSOR_LIST_TRANSFORM_HPP 16# 17# include <msgpack/preprocessor/config/config.hpp> 18# include <msgpack/preprocessor/list/fold_right.hpp> 19# include <msgpack/preprocessor/tuple/elem.hpp> 20# include <msgpack/preprocessor/tuple/rem.hpp> 21# 22# /* MSGPACK_PP_LIST_TRANSFORM */ 23# 24# if ~MSGPACK_PP_CONFIG_FLAGS() & MSGPACK_PP_CONFIG_EDG() 25# define MSGPACK_PP_LIST_TRANSFORM(op, data, list) MSGPACK_PP_TUPLE_ELEM(3, 2, MSGPACK_PP_LIST_FOLD_RIGHT(MSGPACK_PP_LIST_TRANSFORM_O, (op, data, MSGPACK_PP_NIL), list)) 26# else 27# define MSGPACK_PP_LIST_TRANSFORM(op, data, list) MSGPACK_PP_LIST_TRANSFORM_I(op, data, list) 28# define MSGPACK_PP_LIST_TRANSFORM_I(op, data, list) MSGPACK_PP_TUPLE_ELEM(3, 2, MSGPACK_PP_LIST_FOLD_RIGHT(MSGPACK_PP_LIST_TRANSFORM_O, (op, data, MSGPACK_PP_NIL), list)) 29# endif 30# 31# if ~MSGPACK_PP_CONFIG_FLAGS() & MSGPACK_PP_CONFIG_EDG() 32# define MSGPACK_PP_LIST_TRANSFORM_O(d, odr, elem) MSGPACK_PP_LIST_TRANSFORM_O_D(d, MSGPACK_PP_TUPLE_ELEM(3, 0, odr), MSGPACK_PP_TUPLE_ELEM(3, 1, odr), MSGPACK_PP_TUPLE_ELEM(3, 2, odr), elem) 33# else 34# define MSGPACK_PP_LIST_TRANSFORM_O(d, odr, elem) MSGPACK_PP_LIST_TRANSFORM_O_I(d, MSGPACK_PP_TUPLE_REM_3 odr, elem) 35# define MSGPACK_PP_LIST_TRANSFORM_O_I(d, im, elem) MSGPACK_PP_LIST_TRANSFORM_O_D(d, im, elem) 36# endif 37# 38# define MSGPACK_PP_LIST_TRANSFORM_O_D(d, op, data, res, elem) (op, data, (op(d, data, elem), res)) 39# 40# /* MSGPACK_PP_LIST_TRANSFORM_D */ 41# 42# if ~MSGPACK_PP_CONFIG_FLAGS() & MSGPACK_PP_CONFIG_EDG() 43# define MSGPACK_PP_LIST_TRANSFORM_D(d, op, data, list) MSGPACK_PP_TUPLE_ELEM(3, 2, MSGPACK_PP_LIST_FOLD_RIGHT_ ## d(MSGPACK_PP_LIST_TRANSFORM_O, (op, data, MSGPACK_PP_NIL), list)) 44# else 45# define MSGPACK_PP_LIST_TRANSFORM_D(d, op, data, list) MSGPACK_PP_LIST_TRANSFORM_D_I(d, op, data, list) 46# define MSGPACK_PP_LIST_TRANSFORM_D_I(d, op, data, list) MSGPACK_PP_TUPLE_ELEM(3, 2, MSGPACK_PP_LIST_FOLD_RIGHT_ ## d(MSGPACK_PP_LIST_TRANSFORM_O, (op, data, MSGPACK_PP_NIL), list)) 47# endif 48# 49# endif 50