123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667 |
- /**
- * 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)
- /**
- * 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
|