668 lines
30 KiB
C
668 lines
30 KiB
C
/**
|
|
* Macros for metaprogramming
|
|
* ExtendedC
|
|
*
|
|
* Copyright (C) 2012 Justin Spahr-Summers
|
|
* Released under the MIT license
|
|
*/
|
|
|
|
#ifndef EXTC_METAMACROS_H
|
|
#define EXTC_METAMACROS_H
|
|
|
|
|
|
/**
|
|
* Executes one or more expressions (which may have a void type, such as a call
|
|
* to a function that returns no value) and always returns true.
|
|
*/
|
|
#define metamacro_exprify(...) \
|
|
((__VA_ARGS__), true)
|
|
|
|
/**
|
|
* Returns a string representation of VALUE after full macro expansion.
|
|
*/
|
|
#define metamacro_stringify(VALUE) \
|
|
metamacro_stringify_(VALUE)
|
|
|
|
/**
|
|
* Returns A and B concatenated after full macro expansion.
|
|
*/
|
|
#define metamacro_concat(A, B) \
|
|
metamacro_concat_(A, B)
|
|
|
|
/**
|
|
* Returns the Nth variadic argument (starting from zero). At least
|
|
* N + 1 variadic arguments must be given. N must be between zero and twenty,
|
|
* inclusive.
|
|
*/
|
|
#define metamacro_at(N, ...) \
|
|
metamacro_concat(metamacro_at, N)(__VA_ARGS__)
|
|
|
|
/**
|
|
* Returns the number of arguments (up to twenty) provided to the macro. At
|
|
* least one argument must be provided.
|
|
*
|
|
* Inspired by P99: http://p99.gforge.inria.fr
|
|
*/
|
|
#define metamacro_argcount(...) \
|
|
metamacro_at(20, ##__VA_ARGS__, 20, 19, 18, 17, 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0)
|
|
|
|
/**
|
|
* Identical to #metamacro_foreach_cxt, except that no CONTEXT argument is
|
|
* given. Only the index and current argument will thus be passed to MACRO.
|
|
*/
|
|
#define metamacro_foreach(MACRO, SEP, ...) \
|
|
metamacro_foreach_cxt(metamacro_foreach_iter, SEP, MACRO, __VA_ARGS__)
|
|
|
|
/**
|
|
* For each consecutive variadic argument (up to twenty), MACRO is passed the
|
|
* zero-based index of the current argument, CONTEXT, and then the argument
|
|
* itself. The results of adjoining invocations of MACRO are then separated by
|
|
* SEP.
|
|
*
|
|
* Inspired by P99: http://p99.gforge.inria.fr
|
|
*/
|
|
#define metamacro_foreach_cxt(MACRO, SEP, CONTEXT, ...) \
|
|
metamacro_concat(metamacro_foreach_cxt, metamacro_argcount(__VA_ARGS__))(MACRO, SEP, CONTEXT, __VA_ARGS__)
|
|
|
|
/**
|
|
* Identical to #metamacro_foreach_cxt. This can be used when the former would
|
|
* fail due to recursive macro expansion.
|
|
*/
|
|
#define metamacro_foreach_cxt_recursive(MACRO, SEP, CONTEXT, ...) \
|
|
metamacro_concat(metamacro_foreach_cxt_recursive, metamacro_argcount(__VA_ARGS__))(MACRO, SEP, CONTEXT, __VA_ARGS__)
|
|
|
|
/**
|
|
* In consecutive order, appends each variadic argument (up to twenty) onto
|
|
* BASE. The resulting concatenations are then separated by SEP.
|
|
*
|
|
* This is primarily useful to manipulate a list of macro invocations into instead
|
|
* invoking a different, possibly related macro.
|
|
*/
|
|
#define metamacro_foreach_concat(BASE, SEP, ...) \
|
|
metamacro_foreach_cxt(metamacro_foreach_concat_iter, SEP, BASE, __VA_ARGS__)
|
|
|
|
/**
|
|
* Iterates COUNT times, each time invoking MACRO with the current index
|
|
* (starting at zero) and CONTEXT. The results of adjoining invocations of MACRO
|
|
* are then separated by SEP.
|
|
*
|
|
* COUNT must be an integer between zero and twenty, inclusive.
|
|
*/
|
|
#define metamacro_for_cxt(COUNT, MACRO, SEP, CONTEXT) \
|
|
metamacro_concat(metamacro_for_cxt, COUNT)(MACRO, SEP, CONTEXT)
|
|
|
|
/**
|
|
* Returns the first argument given. At least one argument must be provided.
|
|
*
|
|
* This is useful when implementing a variadic macro, where you may have only
|
|
* one variadic argument, but no way to retrieve it (for example, because \c ...
|
|
* always needs to match at least one argument).
|
|
*
|
|
* @code
|
|
|
|
#define varmacro(...) \
|
|
metamacro_head(__VA_ARGS__)
|
|
|
|
* @endcode
|
|
*/
|
|
#define metamacro_head(...) \
|
|
metamacro_head_(__VA_ARGS__, 0)
|
|
|
|
/**
|
|
* Returns every argument except the first. At least two arguments must be
|
|
* provided.
|
|
*/
|
|
#define metamacro_tail(...) \
|
|
metamacro_tail_(__VA_ARGS__)
|
|
|
|
/**
|
|
* Returns the first N (up to twenty) variadic arguments as a new argument list.
|
|
* At least N variadic arguments must be provided.
|
|
*/
|
|
#define metamacro_take(N, ...) \
|
|
metamacro_concat(metamacro_take, N)(__VA_ARGS__)
|
|
|
|
/**
|
|
* Removes the first N (up to twenty) variadic arguments from the given argument
|
|
* list. At least N variadic arguments must be provided.
|
|
*/
|
|
#define metamacro_drop(N, ...) \
|
|
metamacro_concat(metamacro_drop, N)(__VA_ARGS__)
|
|
|
|
/**
|
|
* Decrements VAL, which must be a number between zero and twenty, inclusive.
|
|
*
|
|
* This is primarily useful when dealing with indexes and counts in
|
|
* metaprogramming.
|
|
*/
|
|
#define metamacro_dec(VAL) \
|
|
metamacro_at(VAL, -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19)
|
|
|
|
/**
|
|
* Increments VAL, which must be a number between zero and twenty, inclusive.
|
|
*
|
|
* This is primarily useful when dealing with indexes and counts in
|
|
* metaprogramming.
|
|
*/
|
|
#define metamacro_inc(VAL) \
|
|
metamacro_at(VAL, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21)
|
|
|
|
/**
|
|
* If A is equal to B, the next argument list is expanded; otherwise, the
|
|
* argument list after that is expanded. A and B must be numbers between zero
|
|
* and twenty, inclusive. Additionally, B must be greater than or equal to A.
|
|
*
|
|
* @code
|
|
|
|
// expands to true
|
|
metamacro_if_eq(0, 0)(true)(false)
|
|
|
|
// expands to false
|
|
metamacro_if_eq(0, 1)(true)(false)
|
|
|
|
* @endcode
|
|
*
|
|
* This is primarily useful when dealing with indexes and counts in
|
|
* metaprogramming.
|
|
*/
|
|
#define metamacro_if_eq(A, B) \
|
|
metamacro_concat(metamacro_if_eq, A)(B)
|
|
|
|
/**
|
|
* Identical to #metamacro_if_eq. This can be used when the former would fail
|
|
* due to recursive macro expansion.
|
|
*/
|
|
#define metamacro_if_eq_recursive(A, B) \
|
|
metamacro_concat(metamacro_if_eq_recursive, A)(B)
|
|
|
|
/**
|
|
* Returns 1 if N is an even number, or 0 otherwise. N must be between zero and
|
|
* twenty, inclusive.
|
|
*
|
|
* For the purposes of this test, zero is considered even.
|
|
*/
|
|
#define metamacro_is_even(N) \
|
|
metamacro_at(N, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1)
|
|
|
|
/**
|
|
* Returns the logical NOT of B, which must be the number zero or one.
|
|
*/
|
|
#define metamacro_not(B) \
|
|
metamacro_at(B, 1, 0)
|
|
|
|
// IMPLEMENTATION DETAILS FOLLOW!
|
|
// Do not write code that depends on anything below this line.
|
|
#define metamacro_stringify_(VALUE) # VALUE
|
|
#define metamacro_concat_(A, B) A ## B
|
|
#define metamacro_foreach_iter(INDEX, MACRO, ARG) MACRO(INDEX, ARG)
|
|
#define metamacro_head_(FIRST, ...) FIRST
|
|
#define metamacro_tail_(FIRST, ...) __VA_ARGS__
|
|
#define metamacro_consume_(...)
|
|
#define metamacro_expand_(...) __VA_ARGS__
|
|
|
|
// implemented from scratch so that metamacro_concat() doesn't end up nesting
|
|
#define metamacro_foreach_concat_iter(INDEX, BASE, ARG) metamacro_foreach_concat_iter_(BASE, ARG)
|
|
#define metamacro_foreach_concat_iter_(BASE, ARG) BASE ## ARG
|
|
|
|
// metamacro_at expansions
|
|
#define metamacro_at0(...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at1(_0, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at2(_0, _1, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at3(_0, _1, _2, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at4(_0, _1, _2, _3, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at5(_0, _1, _2, _3, _4, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at6(_0, _1, _2, _3, _4, _5, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at7(_0, _1, _2, _3, _4, _5, _6, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at8(_0, _1, _2, _3, _4, _5, _6, _7, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at9(_0, _1, _2, _3, _4, _5, _6, _7, _8, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at10(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at11(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at12(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at13(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at14(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at15(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at16(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at17(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at18(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at19(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18, ...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_at20(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18, _19, ...) metamacro_head(__VA_ARGS__)
|
|
|
|
// metamacro_foreach_cxt expansions
|
|
#define metamacro_foreach_cxt0(MACRO, SEP, CONTEXT)
|
|
#define metamacro_foreach_cxt1(MACRO, SEP, CONTEXT, _0) MACRO(0, CONTEXT, _0)
|
|
|
|
#define metamacro_foreach_cxt2(MACRO, SEP, CONTEXT, _0, _1) \
|
|
metamacro_foreach_cxt1(MACRO, SEP, CONTEXT, _0) \
|
|
SEP \
|
|
MACRO(1, CONTEXT, _1)
|
|
|
|
#define metamacro_foreach_cxt3(MACRO, SEP, CONTEXT, _0, _1, _2) \
|
|
metamacro_foreach_cxt2(MACRO, SEP, CONTEXT, _0, _1) \
|
|
SEP \
|
|
MACRO(2, CONTEXT, _2)
|
|
|
|
#define metamacro_foreach_cxt4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
|
|
metamacro_foreach_cxt3(MACRO, SEP, CONTEXT, _0, _1, _2) \
|
|
SEP \
|
|
MACRO(3, CONTEXT, _3)
|
|
|
|
#define metamacro_foreach_cxt5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
|
|
metamacro_foreach_cxt4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
|
|
SEP \
|
|
MACRO(4, CONTEXT, _4)
|
|
|
|
#define metamacro_foreach_cxt6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
|
|
metamacro_foreach_cxt5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
|
|
SEP \
|
|
MACRO(5, CONTEXT, _5)
|
|
|
|
#define metamacro_foreach_cxt7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
|
|
metamacro_foreach_cxt6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
|
|
SEP \
|
|
MACRO(6, CONTEXT, _6)
|
|
|
|
#define metamacro_foreach_cxt8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
|
|
metamacro_foreach_cxt7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
|
|
SEP \
|
|
MACRO(7, CONTEXT, _7)
|
|
|
|
#define metamacro_foreach_cxt9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
|
|
metamacro_foreach_cxt8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
|
|
SEP \
|
|
MACRO(8, CONTEXT, _8)
|
|
|
|
#define metamacro_foreach_cxt10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
|
|
metamacro_foreach_cxt9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
|
|
SEP \
|
|
MACRO(9, CONTEXT, _9)
|
|
|
|
#define metamacro_foreach_cxt11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
|
|
metamacro_foreach_cxt10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
|
|
SEP \
|
|
MACRO(10, CONTEXT, _10)
|
|
|
|
#define metamacro_foreach_cxt12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
|
|
metamacro_foreach_cxt11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
|
|
SEP \
|
|
MACRO(11, CONTEXT, _11)
|
|
|
|
#define metamacro_foreach_cxt13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
|
|
metamacro_foreach_cxt12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
|
|
SEP \
|
|
MACRO(12, CONTEXT, _12)
|
|
|
|
#define metamacro_foreach_cxt14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
|
|
metamacro_foreach_cxt13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
|
|
SEP \
|
|
MACRO(13, CONTEXT, _13)
|
|
|
|
#define metamacro_foreach_cxt15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
|
|
metamacro_foreach_cxt14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
|
|
SEP \
|
|
MACRO(14, CONTEXT, _14)
|
|
|
|
#define metamacro_foreach_cxt16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
|
|
metamacro_foreach_cxt15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
|
|
SEP \
|
|
MACRO(15, CONTEXT, _15)
|
|
|
|
#define metamacro_foreach_cxt17(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16) \
|
|
metamacro_foreach_cxt16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
|
|
SEP \
|
|
MACRO(16, CONTEXT, _16)
|
|
|
|
#define metamacro_foreach_cxt18(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17) \
|
|
metamacro_foreach_cxt17(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16) \
|
|
SEP \
|
|
MACRO(17, CONTEXT, _17)
|
|
|
|
#define metamacro_foreach_cxt19(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18) \
|
|
metamacro_foreach_cxt18(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17) \
|
|
SEP \
|
|
MACRO(18, CONTEXT, _18)
|
|
|
|
#define metamacro_foreach_cxt20(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18, _19) \
|
|
metamacro_foreach_cxt19(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18) \
|
|
SEP \
|
|
MACRO(19, CONTEXT, _19)
|
|
|
|
// metamacro_foreach_cxt_recursive expansions
|
|
#define metamacro_foreach_cxt_recursive0(MACRO, SEP, CONTEXT)
|
|
#define metamacro_foreach_cxt_recursive1(MACRO, SEP, CONTEXT, _0) MACRO(0, CONTEXT, _0)
|
|
|
|
#define metamacro_foreach_cxt_recursive2(MACRO, SEP, CONTEXT, _0, _1) \
|
|
metamacro_foreach_cxt_recursive1(MACRO, SEP, CONTEXT, _0) \
|
|
SEP \
|
|
MACRO(1, CONTEXT, _1)
|
|
|
|
#define metamacro_foreach_cxt_recursive3(MACRO, SEP, CONTEXT, _0, _1, _2) \
|
|
metamacro_foreach_cxt_recursive2(MACRO, SEP, CONTEXT, _0, _1) \
|
|
SEP \
|
|
MACRO(2, CONTEXT, _2)
|
|
|
|
#define metamacro_foreach_cxt_recursive4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
|
|
metamacro_foreach_cxt_recursive3(MACRO, SEP, CONTEXT, _0, _1, _2) \
|
|
SEP \
|
|
MACRO(3, CONTEXT, _3)
|
|
|
|
#define metamacro_foreach_cxt_recursive5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
|
|
metamacro_foreach_cxt_recursive4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
|
|
SEP \
|
|
MACRO(4, CONTEXT, _4)
|
|
|
|
#define metamacro_foreach_cxt_recursive6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
|
|
metamacro_foreach_cxt_recursive5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
|
|
SEP \
|
|
MACRO(5, CONTEXT, _5)
|
|
|
|
#define metamacro_foreach_cxt_recursive7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
|
|
metamacro_foreach_cxt_recursive6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
|
|
SEP \
|
|
MACRO(6, CONTEXT, _6)
|
|
|
|
#define metamacro_foreach_cxt_recursive8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
|
|
metamacro_foreach_cxt_recursive7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
|
|
SEP \
|
|
MACRO(7, CONTEXT, _7)
|
|
|
|
#define metamacro_foreach_cxt_recursive9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
|
|
metamacro_foreach_cxt_recursive8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
|
|
SEP \
|
|
MACRO(8, CONTEXT, _8)
|
|
|
|
#define metamacro_foreach_cxt_recursive10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
|
|
metamacro_foreach_cxt_recursive9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
|
|
SEP \
|
|
MACRO(9, CONTEXT, _9)
|
|
|
|
#define metamacro_foreach_cxt_recursive11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
|
|
metamacro_foreach_cxt_recursive10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
|
|
SEP \
|
|
MACRO(10, CONTEXT, _10)
|
|
|
|
#define metamacro_foreach_cxt_recursive12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
|
|
metamacro_foreach_cxt_recursive11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
|
|
SEP \
|
|
MACRO(11, CONTEXT, _11)
|
|
|
|
#define metamacro_foreach_cxt_recursive13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
|
|
metamacro_foreach_cxt_recursive12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
|
|
SEP \
|
|
MACRO(12, CONTEXT, _12)
|
|
|
|
#define metamacro_foreach_cxt_recursive14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
|
|
metamacro_foreach_cxt_recursive13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
|
|
SEP \
|
|
MACRO(13, CONTEXT, _13)
|
|
|
|
#define metamacro_foreach_cxt_recursive15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
|
|
metamacro_foreach_cxt_recursive14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
|
|
SEP \
|
|
MACRO(14, CONTEXT, _14)
|
|
|
|
#define metamacro_foreach_cxt_recursive16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
|
|
metamacro_foreach_cxt_recursive15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
|
|
SEP \
|
|
MACRO(15, CONTEXT, _15)
|
|
|
|
#define metamacro_foreach_cxt_recursive17(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16) \
|
|
metamacro_foreach_cxt_recursive16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
|
|
SEP \
|
|
MACRO(16, CONTEXT, _16)
|
|
|
|
#define metamacro_foreach_cxt_recursive18(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17) \
|
|
metamacro_foreach_cxt_recursive17(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16) \
|
|
SEP \
|
|
MACRO(17, CONTEXT, _17)
|
|
|
|
#define metamacro_foreach_cxt_recursive19(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18) \
|
|
metamacro_foreach_cxt_recursive18(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17) \
|
|
SEP \
|
|
MACRO(18, CONTEXT, _18)
|
|
|
|
#define metamacro_foreach_cxt_recursive20(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18, _19) \
|
|
metamacro_foreach_cxt_recursive19(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17, _18) \
|
|
SEP \
|
|
MACRO(19, CONTEXT, _19)
|
|
|
|
// metamacro_for_cxt expansions
|
|
#define metamacro_for_cxt0(MACRO, SEP, CONTEXT)
|
|
#define metamacro_for_cxt1(MACRO, SEP, CONTEXT) MACRO(0, CONTEXT)
|
|
|
|
#define metamacro_for_cxt2(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt1(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(1, CONTEXT)
|
|
|
|
#define metamacro_for_cxt3(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt2(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(2, CONTEXT)
|
|
|
|
#define metamacro_for_cxt4(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt3(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(3, CONTEXT)
|
|
|
|
#define metamacro_for_cxt5(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt4(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(4, CONTEXT)
|
|
|
|
#define metamacro_for_cxt6(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt5(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(5, CONTEXT)
|
|
|
|
#define metamacro_for_cxt7(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt6(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(6, CONTEXT)
|
|
|
|
#define metamacro_for_cxt8(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt7(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(7, CONTEXT)
|
|
|
|
#define metamacro_for_cxt9(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt8(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(8, CONTEXT)
|
|
|
|
#define metamacro_for_cxt10(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt9(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(9, CONTEXT)
|
|
|
|
#define metamacro_for_cxt11(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt10(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(10, CONTEXT)
|
|
|
|
#define metamacro_for_cxt12(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt11(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(11, CONTEXT)
|
|
|
|
#define metamacro_for_cxt13(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt12(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(12, CONTEXT)
|
|
|
|
#define metamacro_for_cxt14(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt13(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(13, CONTEXT)
|
|
|
|
#define metamacro_for_cxt15(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt14(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(14, CONTEXT)
|
|
|
|
#define metamacro_for_cxt16(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt15(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(15, CONTEXT)
|
|
|
|
#define metamacro_for_cxt17(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt16(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(16, CONTEXT)
|
|
|
|
#define metamacro_for_cxt18(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt17(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(17, CONTEXT)
|
|
|
|
#define metamacro_for_cxt19(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt18(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(18, CONTEXT)
|
|
|
|
#define metamacro_for_cxt20(MACRO, SEP, CONTEXT) \
|
|
metamacro_for_cxt19(MACRO, SEP, CONTEXT) \
|
|
SEP \
|
|
MACRO(19, CONTEXT)
|
|
|
|
// metamacro_if_eq expansions
|
|
#define metamacro_if_eq0(VALUE) \
|
|
metamacro_concat(metamacro_if_eq0_, VALUE)
|
|
|
|
#define metamacro_if_eq0_0(...) __VA_ARGS__ metamacro_consume_
|
|
#define metamacro_if_eq0_1(...) metamacro_expand_
|
|
#define metamacro_if_eq0_2(...) metamacro_expand_
|
|
#define metamacro_if_eq0_3(...) metamacro_expand_
|
|
#define metamacro_if_eq0_4(...) metamacro_expand_
|
|
#define metamacro_if_eq0_5(...) metamacro_expand_
|
|
#define metamacro_if_eq0_6(...) metamacro_expand_
|
|
#define metamacro_if_eq0_7(...) metamacro_expand_
|
|
#define metamacro_if_eq0_8(...) metamacro_expand_
|
|
#define metamacro_if_eq0_9(...) metamacro_expand_
|
|
#define metamacro_if_eq0_10(...) metamacro_expand_
|
|
#define metamacro_if_eq0_11(...) metamacro_expand_
|
|
#define metamacro_if_eq0_12(...) metamacro_expand_
|
|
#define metamacro_if_eq0_13(...) metamacro_expand_
|
|
#define metamacro_if_eq0_14(...) metamacro_expand_
|
|
#define metamacro_if_eq0_15(...) metamacro_expand_
|
|
#define metamacro_if_eq0_16(...) metamacro_expand_
|
|
#define metamacro_if_eq0_17(...) metamacro_expand_
|
|
#define metamacro_if_eq0_18(...) metamacro_expand_
|
|
#define metamacro_if_eq0_19(...) metamacro_expand_
|
|
#define metamacro_if_eq0_20(...) metamacro_expand_
|
|
|
|
#define metamacro_if_eq1(VALUE) metamacro_if_eq0(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq2(VALUE) metamacro_if_eq1(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq3(VALUE) metamacro_if_eq2(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq4(VALUE) metamacro_if_eq3(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq5(VALUE) metamacro_if_eq4(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq6(VALUE) metamacro_if_eq5(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq7(VALUE) metamacro_if_eq6(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq8(VALUE) metamacro_if_eq7(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq9(VALUE) metamacro_if_eq8(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq10(VALUE) metamacro_if_eq9(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq11(VALUE) metamacro_if_eq10(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq12(VALUE) metamacro_if_eq11(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq13(VALUE) metamacro_if_eq12(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq14(VALUE) metamacro_if_eq13(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq15(VALUE) metamacro_if_eq14(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq16(VALUE) metamacro_if_eq15(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq17(VALUE) metamacro_if_eq16(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq18(VALUE) metamacro_if_eq17(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq19(VALUE) metamacro_if_eq18(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq20(VALUE) metamacro_if_eq19(metamacro_dec(VALUE))
|
|
|
|
// metamacro_if_eq_recursive expansions
|
|
#define metamacro_if_eq_recursive0(VALUE) \
|
|
metamacro_concat(metamacro_if_eq_recursive0_, VALUE)
|
|
|
|
#define metamacro_if_eq_recursive0_0(...) __VA_ARGS__ metamacro_consume_
|
|
#define metamacro_if_eq_recursive0_1(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_2(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_3(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_4(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_5(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_6(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_7(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_8(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_9(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_10(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_11(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_12(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_13(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_14(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_15(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_16(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_17(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_18(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_19(...) metamacro_expand_
|
|
#define metamacro_if_eq_recursive0_20(...) metamacro_expand_
|
|
|
|
#define metamacro_if_eq_recursive1(VALUE) metamacro_if_eq_recursive0(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive2(VALUE) metamacro_if_eq_recursive1(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive3(VALUE) metamacro_if_eq_recursive2(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive4(VALUE) metamacro_if_eq_recursive3(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive5(VALUE) metamacro_if_eq_recursive4(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive6(VALUE) metamacro_if_eq_recursive5(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive7(VALUE) metamacro_if_eq_recursive6(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive8(VALUE) metamacro_if_eq_recursive7(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive9(VALUE) metamacro_if_eq_recursive8(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive10(VALUE) metamacro_if_eq_recursive9(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive11(VALUE) metamacro_if_eq_recursive10(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive12(VALUE) metamacro_if_eq_recursive11(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive13(VALUE) metamacro_if_eq_recursive12(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive14(VALUE) metamacro_if_eq_recursive13(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive15(VALUE) metamacro_if_eq_recursive14(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive16(VALUE) metamacro_if_eq_recursive15(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive17(VALUE) metamacro_if_eq_recursive16(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive18(VALUE) metamacro_if_eq_recursive17(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive19(VALUE) metamacro_if_eq_recursive18(metamacro_dec(VALUE))
|
|
#define metamacro_if_eq_recursive20(VALUE) metamacro_if_eq_recursive19(metamacro_dec(VALUE))
|
|
|
|
// metamacro_take expansions
|
|
#define metamacro_take0(...)
|
|
#define metamacro_take1(...) metamacro_head(__VA_ARGS__)
|
|
#define metamacro_take2(...) metamacro_head(__VA_ARGS__), metamacro_take1(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take3(...) metamacro_head(__VA_ARGS__), metamacro_take2(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take4(...) metamacro_head(__VA_ARGS__), metamacro_take3(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take5(...) metamacro_head(__VA_ARGS__), metamacro_take4(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take6(...) metamacro_head(__VA_ARGS__), metamacro_take5(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take7(...) metamacro_head(__VA_ARGS__), metamacro_take6(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take8(...) metamacro_head(__VA_ARGS__), metamacro_take7(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take9(...) metamacro_head(__VA_ARGS__), metamacro_take8(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take10(...) metamacro_head(__VA_ARGS__), metamacro_take9(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take11(...) metamacro_head(__VA_ARGS__), metamacro_take10(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take12(...) metamacro_head(__VA_ARGS__), metamacro_take11(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take13(...) metamacro_head(__VA_ARGS__), metamacro_take12(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take14(...) metamacro_head(__VA_ARGS__), metamacro_take13(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take15(...) metamacro_head(__VA_ARGS__), metamacro_take14(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take16(...) metamacro_head(__VA_ARGS__), metamacro_take15(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take17(...) metamacro_head(__VA_ARGS__), metamacro_take16(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take18(...) metamacro_head(__VA_ARGS__), metamacro_take17(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take19(...) metamacro_head(__VA_ARGS__), metamacro_take18(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_take20(...) metamacro_head(__VA_ARGS__), metamacro_take19(metamacro_tail(__VA_ARGS__))
|
|
|
|
// metamacro_drop expansions
|
|
#define metamacro_drop0(...) __VA_ARGS__
|
|
#define metamacro_drop1(...) metamacro_tail(__VA_ARGS__)
|
|
#define metamacro_drop2(...) metamacro_drop1(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop3(...) metamacro_drop2(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop4(...) metamacro_drop3(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop5(...) metamacro_drop4(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop6(...) metamacro_drop5(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop7(...) metamacro_drop6(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop8(...) metamacro_drop7(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop9(...) metamacro_drop8(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop10(...) metamacro_drop9(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop11(...) metamacro_drop10(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop12(...) metamacro_drop11(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop13(...) metamacro_drop12(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop14(...) metamacro_drop13(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop15(...) metamacro_drop14(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop16(...) metamacro_drop15(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop17(...) metamacro_drop16(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop18(...) metamacro_drop17(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop19(...) metamacro_drop18(metamacro_tail(__VA_ARGS__))
|
|
#define metamacro_drop20(...) metamacro_drop19(metamacro_tail(__VA_ARGS__))
|
|
|
|
#endif
|