metamacros.h 30 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662
  1. /**
  2. * Macros for metaprogramming
  3. * ExtendedC
  4. *
  5. * Copyright (C) 2012 Justin Spahr-Summers
  6. * Released under the MIT license
  7. */
  8. /**
  9. * Executes one or more expressions (which may have a void type, such as a call
  10. * to a function that returns no value) and always returns true.
  11. */
  12. #define metamacro_exprify(...) \
  13. ((__VA_ARGS__), true)
  14. /**
  15. * Returns a string representation of VALUE after full macro expansion.
  16. */
  17. #define metamacro_stringify(VALUE) \
  18. metamacro_stringify_(VALUE)
  19. /**
  20. * Returns A and B concatenated after full macro expansion.
  21. */
  22. #define metamacro_concat(A, B) \
  23. metamacro_concat_(A, B)
  24. /**
  25. * Returns the Nth variadic argument (starting from zero). At least
  26. * N + 1 variadic arguments must be given. N must be between zero and twenty,
  27. * inclusive.
  28. */
  29. #define metamacro_at(N, ...) \
  30. metamacro_concat(metamacro_at, N)(__VA_ARGS__)
  31. /**
  32. * Returns the number of arguments (up to twenty) provided to the macro. At
  33. * least one argument must be provided.
  34. *
  35. * Inspired by P99: http://p99.gforge.inria.fr
  36. */
  37. #define metamacro_argcount(...) \
  38. 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)
  39. /**
  40. * Identical to #metamacro_foreach_cxt, except that no CONTEXT argument is
  41. * given. Only the index and current argument will thus be passed to MACRO.
  42. */
  43. #define metamacro_foreach(MACRO, SEP, ...) \
  44. metamacro_foreach_cxt(metamacro_foreach_iter, SEP, MACRO, __VA_ARGS__)
  45. /**
  46. * For each consecutive variadic argument (up to twenty), MACRO is passed the
  47. * zero-based index of the current argument, CONTEXT, and then the argument
  48. * itself. The results of adjoining invocations of MACRO are then separated by
  49. * SEP.
  50. *
  51. * Inspired by P99: http://p99.gforge.inria.fr
  52. */
  53. #define metamacro_foreach_cxt(MACRO, SEP, CONTEXT, ...) \
  54. metamacro_concat(metamacro_foreach_cxt, metamacro_argcount(__VA_ARGS__))(MACRO, SEP, CONTEXT, __VA_ARGS__)
  55. /**
  56. * Identical to #metamacro_foreach_cxt. This can be used when the former would
  57. * fail due to recursive macro expansion.
  58. */
  59. #define metamacro_foreach_cxt_recursive(MACRO, SEP, CONTEXT, ...) \
  60. metamacro_concat(metamacro_foreach_cxt_recursive, metamacro_argcount(__VA_ARGS__))(MACRO, SEP, CONTEXT, __VA_ARGS__)
  61. /**
  62. * In consecutive order, appends each variadic argument (up to twenty) onto
  63. * BASE. The resulting concatenations are then separated by SEP.
  64. *
  65. * This is primarily useful to manipulate a list of macro invocations into instead
  66. * invoking a different, possibly related macro.
  67. */
  68. #define metamacro_foreach_concat(BASE, SEP, ...) \
  69. metamacro_foreach_cxt(metamacro_foreach_concat_iter, SEP, BASE, __VA_ARGS__)
  70. /**
  71. * Iterates COUNT times, each time invoking MACRO with the current index
  72. * (starting at zero) and CONTEXT. The results of adjoining invocations of MACRO
  73. * are then separated by SEP.
  74. *
  75. * COUNT must be an integer between zero and twenty, inclusive.
  76. */
  77. #define metamacro_for_cxt(COUNT, MACRO, SEP, CONTEXT) \
  78. metamacro_concat(metamacro_for_cxt, COUNT)(MACRO, SEP, CONTEXT)
  79. /**
  80. * Returns the first argument given. At least one argument must be provided.
  81. *
  82. * This is useful when implementing a variadic macro, where you may have only
  83. * one variadic argument, but no way to retrieve it (for example, because \c ...
  84. * always needs to match at least one argument).
  85. *
  86. * @code
  87. #define varmacro(...) \
  88. metamacro_head(__VA_ARGS__)
  89. * @endcode
  90. */
  91. #define metamacro_head(...) \
  92. metamacro_head_(__VA_ARGS__, 0)
  93. /**
  94. * Returns every argument except the first. At least two arguments must be
  95. * provided.
  96. */
  97. #define metamacro_tail(...) \
  98. metamacro_tail_(__VA_ARGS__)
  99. /**
  100. * Returns the first N (up to twenty) variadic arguments as a new argument list.
  101. * At least N variadic arguments must be provided.
  102. */
  103. #define metamacro_take(N, ...) \
  104. metamacro_concat(metamacro_take, N)(__VA_ARGS__)
  105. /**
  106. * Removes the first N (up to twenty) variadic arguments from the given argument
  107. * list. At least N variadic arguments must be provided.
  108. */
  109. #define metamacro_drop(N, ...) \
  110. metamacro_concat(metamacro_drop, N)(__VA_ARGS__)
  111. /**
  112. * Decrements VAL, which must be a number between zero and twenty, inclusive.
  113. *
  114. * This is primarily useful when dealing with indexes and counts in
  115. * metaprogramming.
  116. */
  117. #define metamacro_dec(VAL) \
  118. metamacro_at(VAL, -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19)
  119. /**
  120. * Increments VAL, which must be a number between zero and twenty, inclusive.
  121. *
  122. * This is primarily useful when dealing with indexes and counts in
  123. * metaprogramming.
  124. */
  125. #define metamacro_inc(VAL) \
  126. metamacro_at(VAL, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21)
  127. /**
  128. * If A is equal to B, the next argument list is expanded; otherwise, the
  129. * argument list after that is expanded. A and B must be numbers between zero
  130. * and twenty, inclusive. Additionally, B must be greater than or equal to A.
  131. *
  132. * @code
  133. // expands to true
  134. metamacro_if_eq(0, 0)(true)(false)
  135. // expands to false
  136. metamacro_if_eq(0, 1)(true)(false)
  137. * @endcode
  138. *
  139. * This is primarily useful when dealing with indexes and counts in
  140. * metaprogramming.
  141. */
  142. #define metamacro_if_eq(A, B) \
  143. metamacro_concat(metamacro_if_eq, A)(B)
  144. /**
  145. * Identical to #metamacro_if_eq. This can be used when the former would fail
  146. * due to recursive macro expansion.
  147. */
  148. #define metamacro_if_eq_recursive(A, B) \
  149. metamacro_concat(metamacro_if_eq_recursive, A)(B)
  150. /**
  151. * Returns 1 if N is an even number, or 0 otherwise. N must be between zero and
  152. * twenty, inclusive.
  153. *
  154. * For the purposes of this test, zero is considered even.
  155. */
  156. #define metamacro_is_even(N) \
  157. metamacro_at(N, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1)
  158. /**
  159. * Returns the logical NOT of B, which must be the number zero or one.
  160. */
  161. #define metamacro_not(B) \
  162. metamacro_at(B, 1, 0)
  163. // IMPLEMENTATION DETAILS FOLLOW!
  164. // Do not write code that depends on anything below this line.
  165. #define metamacro_stringify_(VALUE) # VALUE
  166. #define metamacro_concat_(A, B) A ## B
  167. #define metamacro_foreach_iter(INDEX, MACRO, ARG) MACRO(INDEX, ARG)
  168. #define metamacro_head_(FIRST, ...) FIRST
  169. #define metamacro_tail_(FIRST, ...) __VA_ARGS__
  170. #define metamacro_consume_(...)
  171. #define metamacro_expand_(...) __VA_ARGS__
  172. // implemented from scratch so that metamacro_concat() doesn't end up nesting
  173. #define metamacro_foreach_concat_iter(INDEX, BASE, ARG) metamacro_foreach_concat_iter_(BASE, ARG)
  174. #define metamacro_foreach_concat_iter_(BASE, ARG) BASE ## ARG
  175. // metamacro_at expansions
  176. #define metamacro_at0(...) metamacro_head(__VA_ARGS__)
  177. #define metamacro_at1(_0, ...) metamacro_head(__VA_ARGS__)
  178. #define metamacro_at2(_0, _1, ...) metamacro_head(__VA_ARGS__)
  179. #define metamacro_at3(_0, _1, _2, ...) metamacro_head(__VA_ARGS__)
  180. #define metamacro_at4(_0, _1, _2, _3, ...) metamacro_head(__VA_ARGS__)
  181. #define metamacro_at5(_0, _1, _2, _3, _4, ...) metamacro_head(__VA_ARGS__)
  182. #define metamacro_at6(_0, _1, _2, _3, _4, _5, ...) metamacro_head(__VA_ARGS__)
  183. #define metamacro_at7(_0, _1, _2, _3, _4, _5, _6, ...) metamacro_head(__VA_ARGS__)
  184. #define metamacro_at8(_0, _1, _2, _3, _4, _5, _6, _7, ...) metamacro_head(__VA_ARGS__)
  185. #define metamacro_at9(_0, _1, _2, _3, _4, _5, _6, _7, _8, ...) metamacro_head(__VA_ARGS__)
  186. #define metamacro_at10(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, ...) metamacro_head(__VA_ARGS__)
  187. #define metamacro_at11(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, ...) metamacro_head(__VA_ARGS__)
  188. #define metamacro_at12(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, ...) metamacro_head(__VA_ARGS__)
  189. #define metamacro_at13(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, ...) metamacro_head(__VA_ARGS__)
  190. #define metamacro_at14(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, ...) metamacro_head(__VA_ARGS__)
  191. #define metamacro_at15(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, ...) metamacro_head(__VA_ARGS__)
  192. #define metamacro_at16(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, ...) metamacro_head(__VA_ARGS__)
  193. #define metamacro_at17(_0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, ...) metamacro_head(__VA_ARGS__)
  194. #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__)
  195. #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__)
  196. #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__)
  197. // metamacro_foreach_cxt expansions
  198. #define metamacro_foreach_cxt0(MACRO, SEP, CONTEXT)
  199. #define metamacro_foreach_cxt1(MACRO, SEP, CONTEXT, _0) MACRO(0, CONTEXT, _0)
  200. #define metamacro_foreach_cxt2(MACRO, SEP, CONTEXT, _0, _1) \
  201. metamacro_foreach_cxt1(MACRO, SEP, CONTEXT, _0) \
  202. SEP \
  203. MACRO(1, CONTEXT, _1)
  204. #define metamacro_foreach_cxt3(MACRO, SEP, CONTEXT, _0, _1, _2) \
  205. metamacro_foreach_cxt2(MACRO, SEP, CONTEXT, _0, _1) \
  206. SEP \
  207. MACRO(2, CONTEXT, _2)
  208. #define metamacro_foreach_cxt4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
  209. metamacro_foreach_cxt3(MACRO, SEP, CONTEXT, _0, _1, _2) \
  210. SEP \
  211. MACRO(3, CONTEXT, _3)
  212. #define metamacro_foreach_cxt5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
  213. metamacro_foreach_cxt4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
  214. SEP \
  215. MACRO(4, CONTEXT, _4)
  216. #define metamacro_foreach_cxt6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
  217. metamacro_foreach_cxt5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
  218. SEP \
  219. MACRO(5, CONTEXT, _5)
  220. #define metamacro_foreach_cxt7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
  221. metamacro_foreach_cxt6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
  222. SEP \
  223. MACRO(6, CONTEXT, _6)
  224. #define metamacro_foreach_cxt8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
  225. metamacro_foreach_cxt7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
  226. SEP \
  227. MACRO(7, CONTEXT, _7)
  228. #define metamacro_foreach_cxt9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
  229. metamacro_foreach_cxt8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
  230. SEP \
  231. MACRO(8, CONTEXT, _8)
  232. #define metamacro_foreach_cxt10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
  233. metamacro_foreach_cxt9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
  234. SEP \
  235. MACRO(9, CONTEXT, _9)
  236. #define metamacro_foreach_cxt11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
  237. metamacro_foreach_cxt10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
  238. SEP \
  239. MACRO(10, CONTEXT, _10)
  240. #define metamacro_foreach_cxt12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
  241. metamacro_foreach_cxt11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
  242. SEP \
  243. MACRO(11, CONTEXT, _11)
  244. #define metamacro_foreach_cxt13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
  245. metamacro_foreach_cxt12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
  246. SEP \
  247. MACRO(12, CONTEXT, _12)
  248. #define metamacro_foreach_cxt14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
  249. metamacro_foreach_cxt13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
  250. SEP \
  251. MACRO(13, CONTEXT, _13)
  252. #define metamacro_foreach_cxt15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
  253. metamacro_foreach_cxt14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
  254. SEP \
  255. MACRO(14, CONTEXT, _14)
  256. #define metamacro_foreach_cxt16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
  257. metamacro_foreach_cxt15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
  258. SEP \
  259. MACRO(15, CONTEXT, _15)
  260. #define metamacro_foreach_cxt17(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16) \
  261. metamacro_foreach_cxt16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
  262. SEP \
  263. MACRO(16, CONTEXT, _16)
  264. #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) \
  265. metamacro_foreach_cxt17(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16) \
  266. SEP \
  267. MACRO(17, CONTEXT, _17)
  268. #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) \
  269. metamacro_foreach_cxt18(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16, _17) \
  270. SEP \
  271. MACRO(18, CONTEXT, _18)
  272. #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) \
  273. 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) \
  274. SEP \
  275. MACRO(19, CONTEXT, _19)
  276. // metamacro_foreach_cxt_recursive expansions
  277. #define metamacro_foreach_cxt_recursive0(MACRO, SEP, CONTEXT)
  278. #define metamacro_foreach_cxt_recursive1(MACRO, SEP, CONTEXT, _0) MACRO(0, CONTEXT, _0)
  279. #define metamacro_foreach_cxt_recursive2(MACRO, SEP, CONTEXT, _0, _1) \
  280. metamacro_foreach_cxt_recursive1(MACRO, SEP, CONTEXT, _0) \
  281. SEP \
  282. MACRO(1, CONTEXT, _1)
  283. #define metamacro_foreach_cxt_recursive3(MACRO, SEP, CONTEXT, _0, _1, _2) \
  284. metamacro_foreach_cxt_recursive2(MACRO, SEP, CONTEXT, _0, _1) \
  285. SEP \
  286. MACRO(2, CONTEXT, _2)
  287. #define metamacro_foreach_cxt_recursive4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
  288. metamacro_foreach_cxt_recursive3(MACRO, SEP, CONTEXT, _0, _1, _2) \
  289. SEP \
  290. MACRO(3, CONTEXT, _3)
  291. #define metamacro_foreach_cxt_recursive5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
  292. metamacro_foreach_cxt_recursive4(MACRO, SEP, CONTEXT, _0, _1, _2, _3) \
  293. SEP \
  294. MACRO(4, CONTEXT, _4)
  295. #define metamacro_foreach_cxt_recursive6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
  296. metamacro_foreach_cxt_recursive5(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4) \
  297. SEP \
  298. MACRO(5, CONTEXT, _5)
  299. #define metamacro_foreach_cxt_recursive7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
  300. metamacro_foreach_cxt_recursive6(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5) \
  301. SEP \
  302. MACRO(6, CONTEXT, _6)
  303. #define metamacro_foreach_cxt_recursive8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
  304. metamacro_foreach_cxt_recursive7(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6) \
  305. SEP \
  306. MACRO(7, CONTEXT, _7)
  307. #define metamacro_foreach_cxt_recursive9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
  308. metamacro_foreach_cxt_recursive8(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7) \
  309. SEP \
  310. MACRO(8, CONTEXT, _8)
  311. #define metamacro_foreach_cxt_recursive10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
  312. metamacro_foreach_cxt_recursive9(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8) \
  313. SEP \
  314. MACRO(9, CONTEXT, _9)
  315. #define metamacro_foreach_cxt_recursive11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
  316. metamacro_foreach_cxt_recursive10(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9) \
  317. SEP \
  318. MACRO(10, CONTEXT, _10)
  319. #define metamacro_foreach_cxt_recursive12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
  320. metamacro_foreach_cxt_recursive11(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10) \
  321. SEP \
  322. MACRO(11, CONTEXT, _11)
  323. #define metamacro_foreach_cxt_recursive13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
  324. metamacro_foreach_cxt_recursive12(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11) \
  325. SEP \
  326. MACRO(12, CONTEXT, _12)
  327. #define metamacro_foreach_cxt_recursive14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
  328. metamacro_foreach_cxt_recursive13(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12) \
  329. SEP \
  330. MACRO(13, CONTEXT, _13)
  331. #define metamacro_foreach_cxt_recursive15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
  332. metamacro_foreach_cxt_recursive14(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13) \
  333. SEP \
  334. MACRO(14, CONTEXT, _14)
  335. #define metamacro_foreach_cxt_recursive16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
  336. metamacro_foreach_cxt_recursive15(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14) \
  337. SEP \
  338. MACRO(15, CONTEXT, _15)
  339. #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) \
  340. metamacro_foreach_cxt_recursive16(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15) \
  341. SEP \
  342. MACRO(16, CONTEXT, _16)
  343. #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) \
  344. metamacro_foreach_cxt_recursive17(MACRO, SEP, CONTEXT, _0, _1, _2, _3, _4, _5, _6, _7, _8, _9, _10, _11, _12, _13, _14, _15, _16) \
  345. SEP \
  346. MACRO(17, CONTEXT, _17)
  347. #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) \
  348. 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) \
  349. SEP \
  350. MACRO(18, CONTEXT, _18)
  351. #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) \
  352. 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) \
  353. SEP \
  354. MACRO(19, CONTEXT, _19)
  355. // metamacro_for_cxt expansions
  356. #define metamacro_for_cxt0(MACRO, SEP, CONTEXT)
  357. #define metamacro_for_cxt1(MACRO, SEP, CONTEXT) MACRO(0, CONTEXT)
  358. #define metamacro_for_cxt2(MACRO, SEP, CONTEXT) \
  359. metamacro_for_cxt1(MACRO, SEP, CONTEXT) \
  360. SEP \
  361. MACRO(1, CONTEXT)
  362. #define metamacro_for_cxt3(MACRO, SEP, CONTEXT) \
  363. metamacro_for_cxt2(MACRO, SEP, CONTEXT) \
  364. SEP \
  365. MACRO(2, CONTEXT)
  366. #define metamacro_for_cxt4(MACRO, SEP, CONTEXT) \
  367. metamacro_for_cxt3(MACRO, SEP, CONTEXT) \
  368. SEP \
  369. MACRO(3, CONTEXT)
  370. #define metamacro_for_cxt5(MACRO, SEP, CONTEXT) \
  371. metamacro_for_cxt4(MACRO, SEP, CONTEXT) \
  372. SEP \
  373. MACRO(4, CONTEXT)
  374. #define metamacro_for_cxt6(MACRO, SEP, CONTEXT) \
  375. metamacro_for_cxt5(MACRO, SEP, CONTEXT) \
  376. SEP \
  377. MACRO(5, CONTEXT)
  378. #define metamacro_for_cxt7(MACRO, SEP, CONTEXT) \
  379. metamacro_for_cxt6(MACRO, SEP, CONTEXT) \
  380. SEP \
  381. MACRO(6, CONTEXT)
  382. #define metamacro_for_cxt8(MACRO, SEP, CONTEXT) \
  383. metamacro_for_cxt7(MACRO, SEP, CONTEXT) \
  384. SEP \
  385. MACRO(7, CONTEXT)
  386. #define metamacro_for_cxt9(MACRO, SEP, CONTEXT) \
  387. metamacro_for_cxt8(MACRO, SEP, CONTEXT) \
  388. SEP \
  389. MACRO(8, CONTEXT)
  390. #define metamacro_for_cxt10(MACRO, SEP, CONTEXT) \
  391. metamacro_for_cxt9(MACRO, SEP, CONTEXT) \
  392. SEP \
  393. MACRO(9, CONTEXT)
  394. #define metamacro_for_cxt11(MACRO, SEP, CONTEXT) \
  395. metamacro_for_cxt10(MACRO, SEP, CONTEXT) \
  396. SEP \
  397. MACRO(10, CONTEXT)
  398. #define metamacro_for_cxt12(MACRO, SEP, CONTEXT) \
  399. metamacro_for_cxt11(MACRO, SEP, CONTEXT) \
  400. SEP \
  401. MACRO(11, CONTEXT)
  402. #define metamacro_for_cxt13(MACRO, SEP, CONTEXT) \
  403. metamacro_for_cxt12(MACRO, SEP, CONTEXT) \
  404. SEP \
  405. MACRO(12, CONTEXT)
  406. #define metamacro_for_cxt14(MACRO, SEP, CONTEXT) \
  407. metamacro_for_cxt13(MACRO, SEP, CONTEXT) \
  408. SEP \
  409. MACRO(13, CONTEXT)
  410. #define metamacro_for_cxt15(MACRO, SEP, CONTEXT) \
  411. metamacro_for_cxt14(MACRO, SEP, CONTEXT) \
  412. SEP \
  413. MACRO(14, CONTEXT)
  414. #define metamacro_for_cxt16(MACRO, SEP, CONTEXT) \
  415. metamacro_for_cxt15(MACRO, SEP, CONTEXT) \
  416. SEP \
  417. MACRO(15, CONTEXT)
  418. #define metamacro_for_cxt17(MACRO, SEP, CONTEXT) \
  419. metamacro_for_cxt16(MACRO, SEP, CONTEXT) \
  420. SEP \
  421. MACRO(16, CONTEXT)
  422. #define metamacro_for_cxt18(MACRO, SEP, CONTEXT) \
  423. metamacro_for_cxt17(MACRO, SEP, CONTEXT) \
  424. SEP \
  425. MACRO(17, CONTEXT)
  426. #define metamacro_for_cxt19(MACRO, SEP, CONTEXT) \
  427. metamacro_for_cxt18(MACRO, SEP, CONTEXT) \
  428. SEP \
  429. MACRO(18, CONTEXT)
  430. #define metamacro_for_cxt20(MACRO, SEP, CONTEXT) \
  431. metamacro_for_cxt19(MACRO, SEP, CONTEXT) \
  432. SEP \
  433. MACRO(19, CONTEXT)
  434. // metamacro_if_eq expansions
  435. #define metamacro_if_eq0(VALUE) \
  436. metamacro_concat(metamacro_if_eq0_, VALUE)
  437. #define metamacro_if_eq0_0(...) __VA_ARGS__ metamacro_consume_
  438. #define metamacro_if_eq0_1(...) metamacro_expand_
  439. #define metamacro_if_eq0_2(...) metamacro_expand_
  440. #define metamacro_if_eq0_3(...) metamacro_expand_
  441. #define metamacro_if_eq0_4(...) metamacro_expand_
  442. #define metamacro_if_eq0_5(...) metamacro_expand_
  443. #define metamacro_if_eq0_6(...) metamacro_expand_
  444. #define metamacro_if_eq0_7(...) metamacro_expand_
  445. #define metamacro_if_eq0_8(...) metamacro_expand_
  446. #define metamacro_if_eq0_9(...) metamacro_expand_
  447. #define metamacro_if_eq0_10(...) metamacro_expand_
  448. #define metamacro_if_eq0_11(...) metamacro_expand_
  449. #define metamacro_if_eq0_12(...) metamacro_expand_
  450. #define metamacro_if_eq0_13(...) metamacro_expand_
  451. #define metamacro_if_eq0_14(...) metamacro_expand_
  452. #define metamacro_if_eq0_15(...) metamacro_expand_
  453. #define metamacro_if_eq0_16(...) metamacro_expand_
  454. #define metamacro_if_eq0_17(...) metamacro_expand_
  455. #define metamacro_if_eq0_18(...) metamacro_expand_
  456. #define metamacro_if_eq0_19(...) metamacro_expand_
  457. #define metamacro_if_eq0_20(...) metamacro_expand_
  458. #define metamacro_if_eq1(VALUE) metamacro_if_eq0(metamacro_dec(VALUE))
  459. #define metamacro_if_eq2(VALUE) metamacro_if_eq1(metamacro_dec(VALUE))
  460. #define metamacro_if_eq3(VALUE) metamacro_if_eq2(metamacro_dec(VALUE))
  461. #define metamacro_if_eq4(VALUE) metamacro_if_eq3(metamacro_dec(VALUE))
  462. #define metamacro_if_eq5(VALUE) metamacro_if_eq4(metamacro_dec(VALUE))
  463. #define metamacro_if_eq6(VALUE) metamacro_if_eq5(metamacro_dec(VALUE))
  464. #define metamacro_if_eq7(VALUE) metamacro_if_eq6(metamacro_dec(VALUE))
  465. #define metamacro_if_eq8(VALUE) metamacro_if_eq7(metamacro_dec(VALUE))
  466. #define metamacro_if_eq9(VALUE) metamacro_if_eq8(metamacro_dec(VALUE))
  467. #define metamacro_if_eq10(VALUE) metamacro_if_eq9(metamacro_dec(VALUE))
  468. #define metamacro_if_eq11(VALUE) metamacro_if_eq10(metamacro_dec(VALUE))
  469. #define metamacro_if_eq12(VALUE) metamacro_if_eq11(metamacro_dec(VALUE))
  470. #define metamacro_if_eq13(VALUE) metamacro_if_eq12(metamacro_dec(VALUE))
  471. #define metamacro_if_eq14(VALUE) metamacro_if_eq13(metamacro_dec(VALUE))
  472. #define metamacro_if_eq15(VALUE) metamacro_if_eq14(metamacro_dec(VALUE))
  473. #define metamacro_if_eq16(VALUE) metamacro_if_eq15(metamacro_dec(VALUE))
  474. #define metamacro_if_eq17(VALUE) metamacro_if_eq16(metamacro_dec(VALUE))
  475. #define metamacro_if_eq18(VALUE) metamacro_if_eq17(metamacro_dec(VALUE))
  476. #define metamacro_if_eq19(VALUE) metamacro_if_eq18(metamacro_dec(VALUE))
  477. #define metamacro_if_eq20(VALUE) metamacro_if_eq19(metamacro_dec(VALUE))
  478. // metamacro_if_eq_recursive expansions
  479. #define metamacro_if_eq_recursive0(VALUE) \
  480. metamacro_concat(metamacro_if_eq_recursive0_, VALUE)
  481. #define metamacro_if_eq_recursive0_0(...) __VA_ARGS__ metamacro_consume_
  482. #define metamacro_if_eq_recursive0_1(...) metamacro_expand_
  483. #define metamacro_if_eq_recursive0_2(...) metamacro_expand_
  484. #define metamacro_if_eq_recursive0_3(...) metamacro_expand_
  485. #define metamacro_if_eq_recursive0_4(...) metamacro_expand_
  486. #define metamacro_if_eq_recursive0_5(...) metamacro_expand_
  487. #define metamacro_if_eq_recursive0_6(...) metamacro_expand_
  488. #define metamacro_if_eq_recursive0_7(...) metamacro_expand_
  489. #define metamacro_if_eq_recursive0_8(...) metamacro_expand_
  490. #define metamacro_if_eq_recursive0_9(...) metamacro_expand_
  491. #define metamacro_if_eq_recursive0_10(...) metamacro_expand_
  492. #define metamacro_if_eq_recursive0_11(...) metamacro_expand_
  493. #define metamacro_if_eq_recursive0_12(...) metamacro_expand_
  494. #define metamacro_if_eq_recursive0_13(...) metamacro_expand_
  495. #define metamacro_if_eq_recursive0_14(...) metamacro_expand_
  496. #define metamacro_if_eq_recursive0_15(...) metamacro_expand_
  497. #define metamacro_if_eq_recursive0_16(...) metamacro_expand_
  498. #define metamacro_if_eq_recursive0_17(...) metamacro_expand_
  499. #define metamacro_if_eq_recursive0_18(...) metamacro_expand_
  500. #define metamacro_if_eq_recursive0_19(...) metamacro_expand_
  501. #define metamacro_if_eq_recursive0_20(...) metamacro_expand_
  502. #define metamacro_if_eq_recursive1(VALUE) metamacro_if_eq_recursive0(metamacro_dec(VALUE))
  503. #define metamacro_if_eq_recursive2(VALUE) metamacro_if_eq_recursive1(metamacro_dec(VALUE))
  504. #define metamacro_if_eq_recursive3(VALUE) metamacro_if_eq_recursive2(metamacro_dec(VALUE))
  505. #define metamacro_if_eq_recursive4(VALUE) metamacro_if_eq_recursive3(metamacro_dec(VALUE))
  506. #define metamacro_if_eq_recursive5(VALUE) metamacro_if_eq_recursive4(metamacro_dec(VALUE))
  507. #define metamacro_if_eq_recursive6(VALUE) metamacro_if_eq_recursive5(metamacro_dec(VALUE))
  508. #define metamacro_if_eq_recursive7(VALUE) metamacro_if_eq_recursive6(metamacro_dec(VALUE))
  509. #define metamacro_if_eq_recursive8(VALUE) metamacro_if_eq_recursive7(metamacro_dec(VALUE))
  510. #define metamacro_if_eq_recursive9(VALUE) metamacro_if_eq_recursive8(metamacro_dec(VALUE))
  511. #define metamacro_if_eq_recursive10(VALUE) metamacro_if_eq_recursive9(metamacro_dec(VALUE))
  512. #define metamacro_if_eq_recursive11(VALUE) metamacro_if_eq_recursive10(metamacro_dec(VALUE))
  513. #define metamacro_if_eq_recursive12(VALUE) metamacro_if_eq_recursive11(metamacro_dec(VALUE))
  514. #define metamacro_if_eq_recursive13(VALUE) metamacro_if_eq_recursive12(metamacro_dec(VALUE))
  515. #define metamacro_if_eq_recursive14(VALUE) metamacro_if_eq_recursive13(metamacro_dec(VALUE))
  516. #define metamacro_if_eq_recursive15(VALUE) metamacro_if_eq_recursive14(metamacro_dec(VALUE))
  517. #define metamacro_if_eq_recursive16(VALUE) metamacro_if_eq_recursive15(metamacro_dec(VALUE))
  518. #define metamacro_if_eq_recursive17(VALUE) metamacro_if_eq_recursive16(metamacro_dec(VALUE))
  519. #define metamacro_if_eq_recursive18(VALUE) metamacro_if_eq_recursive17(metamacro_dec(VALUE))
  520. #define metamacro_if_eq_recursive19(VALUE) metamacro_if_eq_recursive18(metamacro_dec(VALUE))
  521. #define metamacro_if_eq_recursive20(VALUE) metamacro_if_eq_recursive19(metamacro_dec(VALUE))
  522. // metamacro_take expansions
  523. #define metamacro_take0(...)
  524. #define metamacro_take1(...) metamacro_head(__VA_ARGS__)
  525. #define metamacro_take2(...) metamacro_head(__VA_ARGS__), metamacro_take1(metamacro_tail(__VA_ARGS__))
  526. #define metamacro_take3(...) metamacro_head(__VA_ARGS__), metamacro_take2(metamacro_tail(__VA_ARGS__))
  527. #define metamacro_take4(...) metamacro_head(__VA_ARGS__), metamacro_take3(metamacro_tail(__VA_ARGS__))
  528. #define metamacro_take5(...) metamacro_head(__VA_ARGS__), metamacro_take4(metamacro_tail(__VA_ARGS__))
  529. #define metamacro_take6(...) metamacro_head(__VA_ARGS__), metamacro_take5(metamacro_tail(__VA_ARGS__))
  530. #define metamacro_take7(...) metamacro_head(__VA_ARGS__), metamacro_take6(metamacro_tail(__VA_ARGS__))
  531. #define metamacro_take8(...) metamacro_head(__VA_ARGS__), metamacro_take7(metamacro_tail(__VA_ARGS__))
  532. #define metamacro_take9(...) metamacro_head(__VA_ARGS__), metamacro_take8(metamacro_tail(__VA_ARGS__))
  533. #define metamacro_take10(...) metamacro_head(__VA_ARGS__), metamacro_take9(metamacro_tail(__VA_ARGS__))
  534. #define metamacro_take11(...) metamacro_head(__VA_ARGS__), metamacro_take10(metamacro_tail(__VA_ARGS__))
  535. #define metamacro_take12(...) metamacro_head(__VA_ARGS__), metamacro_take11(metamacro_tail(__VA_ARGS__))
  536. #define metamacro_take13(...) metamacro_head(__VA_ARGS__), metamacro_take12(metamacro_tail(__VA_ARGS__))
  537. #define metamacro_take14(...) metamacro_head(__VA_ARGS__), metamacro_take13(metamacro_tail(__VA_ARGS__))
  538. #define metamacro_take15(...) metamacro_head(__VA_ARGS__), metamacro_take14(metamacro_tail(__VA_ARGS__))
  539. #define metamacro_take16(...) metamacro_head(__VA_ARGS__), metamacro_take15(metamacro_tail(__VA_ARGS__))
  540. #define metamacro_take17(...) metamacro_head(__VA_ARGS__), metamacro_take16(metamacro_tail(__VA_ARGS__))
  541. #define metamacro_take18(...) metamacro_head(__VA_ARGS__), metamacro_take17(metamacro_tail(__VA_ARGS__))
  542. #define metamacro_take19(...) metamacro_head(__VA_ARGS__), metamacro_take18(metamacro_tail(__VA_ARGS__))
  543. #define metamacro_take20(...) metamacro_head(__VA_ARGS__), metamacro_take19(metamacro_tail(__VA_ARGS__))
  544. // metamacro_drop expansions
  545. #define metamacro_drop0(...) __VA_ARGS__
  546. #define metamacro_drop1(...) metamacro_tail(__VA_ARGS__)
  547. #define metamacro_drop2(...) metamacro_drop1(metamacro_tail(__VA_ARGS__))
  548. #define metamacro_drop3(...) metamacro_drop2(metamacro_tail(__VA_ARGS__))
  549. #define metamacro_drop4(...) metamacro_drop3(metamacro_tail(__VA_ARGS__))
  550. #define metamacro_drop5(...) metamacro_drop4(metamacro_tail(__VA_ARGS__))
  551. #define metamacro_drop6(...) metamacro_drop5(metamacro_tail(__VA_ARGS__))
  552. #define metamacro_drop7(...) metamacro_drop6(metamacro_tail(__VA_ARGS__))
  553. #define metamacro_drop8(...) metamacro_drop7(metamacro_tail(__VA_ARGS__))
  554. #define metamacro_drop9(...) metamacro_drop8(metamacro_tail(__VA_ARGS__))
  555. #define metamacro_drop10(...) metamacro_drop9(metamacro_tail(__VA_ARGS__))
  556. #define metamacro_drop11(...) metamacro_drop10(metamacro_tail(__VA_ARGS__))
  557. #define metamacro_drop12(...) metamacro_drop11(metamacro_tail(__VA_ARGS__))
  558. #define metamacro_drop13(...) metamacro_drop12(metamacro_tail(__VA_ARGS__))
  559. #define metamacro_drop14(...) metamacro_drop13(metamacro_tail(__VA_ARGS__))
  560. #define metamacro_drop15(...) metamacro_drop14(metamacro_tail(__VA_ARGS__))
  561. #define metamacro_drop16(...) metamacro_drop15(metamacro_tail(__VA_ARGS__))
  562. #define metamacro_drop17(...) metamacro_drop16(metamacro_tail(__VA_ARGS__))
  563. #define metamacro_drop18(...) metamacro_drop17(metamacro_tail(__VA_ARGS__))
  564. #define metamacro_drop19(...) metamacro_drop18(metamacro_tail(__VA_ARGS__))
  565. #define metamacro_drop20(...) metamacro_drop19(metamacro_tail(__VA_ARGS__))