| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091 |
- # /* **************************************************************************
- # * *
- # * (C) Copyright Paul Mensonides 2002.
- # * 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)
- # * *
- # ************************************************************************** */
- #
- # /* Revised by Edward Diener (2011) */
- #
- # /* See http://www.boost.org for most recent version. */
- #
- # include <boost/preprocessor/arithmetic/add.hpp>
- # include <boost/preprocessor/arithmetic/sub.hpp>
- # include <boost/preprocessor/comparison/equal.hpp>
- # include <boost/preprocessor/comparison/less.hpp>
- # include <boost/preprocessor/control/iif.hpp>
- # include <boost/preprocessor/facilities/is_empty.hpp>
- # include <boost/preprocessor/list.hpp>
- # include <boost/preprocessor/tuple/elem.hpp>
- # include <boost/preprocessor/tuple/size.hpp>
- # include <boost/preprocessor/array/elem.hpp>
- # include <boost/preprocessor/array/size.hpp>
- # include <boost/preprocessor/seq/elem.hpp>
- # include <boost/preprocessor/seq/size.hpp>
- # include <boost/preprocessor/variadic/elem.hpp>
- # include <libs/preprocessor/test/test.h>
- # define LISTNIL BOOST_PP_NIL
- # define LIST (4, (1, (5, (2, BOOST_PP_NIL))))
- # define REVERSAL(d, x, y) BOOST_PP_SUB_D(d, y, x)
- # define F1(r, state, x) + x + state
- # define FI2(r, state, i, x) BOOST_PP_IIF(BOOST_PP_EQUAL(i,1),+ x + x + state,+ x + state)
- # define F2(r, x) + BOOST_PP_TUPLE_ELEM(2, 0, x) + 2 - BOOST_PP_TUPLE_ELEM(2, 1, x)
- # define L1 (0, (x, BOOST_PP_NIL))
- # define L2 (a, (1, (b, (2, BOOST_PP_NIL))))
- # define L3 (c, (3, (d, BOOST_PP_NIL)))
- # define LL (L1, (L2, (L3, BOOST_PP_NIL)))
- BEGIN BOOST_PP_LIST_FIRST(LIST) == 4 END
- BEGIN BOOST_PP_LIST_IS_CONS(LIST) == 1 END
- BEGIN BOOST_PP_LIST_IS_CONS(LISTNIL) == 0 END
- BEGIN BOOST_PP_LIST_IS_NIL(LIST) == 0 END
- BEGIN BOOST_PP_LIST_IS_NIL(LISTNIL) == 1 END
- #if BOOST_PP_VARIADICS
- BEGIN BOOST_PP_VARIADIC_ELEM(2,BOOST_PP_LIST_ENUM(LIST)) == 5 END
- #endif
- BEGIN BOOST_PP_LIST_FOLD_LEFT(BOOST_PP_SUB_D, 22, LIST) == 10 END
- BEGIN BOOST_PP_LIST_FOLD_LEFT(BOOST_PP_SUB_D, 22, LISTNIL) == 22 END
- BEGIN BOOST_PP_LIST_FOLD_RIGHT(BOOST_PP_ADD_D, 0, LIST) == 12 END
- BEGIN BOOST_PP_LIST_FOLD_RIGHT(BOOST_PP_ADD_D, 0, LISTNIL) == 0 END
- BEGIN BOOST_PP_LIST_FOLD_RIGHT(REVERSAL, 0, LIST) == 4 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_REVERSE(LIST)) == 2514 END
- BEGIN BOOST_PP_LIST_IS_NIL(BOOST_PP_LIST_REVERSE(LISTNIL)) == 1 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_REST_N(2, LIST)) == 52 END
- BEGIN BOOST_PP_LIST_IS_NIL(BOOST_PP_LIST_REST_N(0, LISTNIL)) == 1 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_FIRST_N(2, LIST)) == 41 END
- BEGIN BOOST_PP_LIST_AT(LIST, 2) == 5 END
- BEGIN BOOST_PP_LIST_SIZE(LIST) == 4 END
- BEGIN BOOST_PP_LIST_SIZE(LISTNIL) == 0 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_TRANSFORM(BOOST_PP_ADD_D, 2, LIST)) == 6374 END
- BEGIN BOOST_PP_LIST_IS_NIL(BOOST_PP_LIST_TRANSFORM(BOOST_PP_ADD_D, 2, LISTNIL)) == 1 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_APPEND(BOOST_PP_LIST_REST(LIST), LIST)) == 1524152 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_APPEND(LIST,LISTNIL)) == 4152 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_APPEND(LISTNIL,LIST)) == 4152 END
- BEGIN BOOST_PP_LIST_IS_NIL(BOOST_PP_LIST_APPEND(LISTNIL,LISTNIL)) == 1 END
- BEGIN BOOST_PP_LIST_FOR_EACH(F1, 1, LIST) == 16 END
- BEGIN BOOST_PP_LIST_FOR_EACH_I(FI2, 1, LIST) == 17 END
- BEGIN BOOST_PP_TUPLE_ELEM(4, 3, BOOST_PP_LIST_TO_TUPLE(LIST)) == 2 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_FILTER(BOOST_PP_LESS_D, 3, LIST)) == 45 END
- BEGIN BOOST_PP_LIST_IS_NIL(BOOST_PP_LIST_FILTER(BOOST_PP_LESS_D, 3, LISTNIL)) == 1 END
- BEGIN BOOST_PP_LIST_FOR_EACH_PRODUCT(F2, 2, ( (1, (0, BOOST_PP_NIL)), (2, (3, BOOST_PP_NIL)) )) == 0 END
- BEGIN BOOST_PP_LIST_CAT(BOOST_PP_LIST_FOLD_LEFT(BOOST_PP_LIST_APPEND_D, BOOST_PP_NIL, LL)) == 0x0a1b2c3d END
- BEGIN BOOST_PP_ARRAY_ELEM(2, BOOST_PP_LIST_TO_ARRAY(LIST)) == 5 END
- BEGIN BOOST_PP_ARRAY_SIZE(BOOST_PP_LIST_TO_ARRAY(LISTNIL)) == 0 END
- BEGIN BOOST_PP_SEQ_ELEM(3, BOOST_PP_LIST_TO_SEQ(LIST)) == 2 END
|
