qcsrc/lib/misc.qh

   1 #pragma once
   2
   3 #ifdef __STDC__
   4         #define EMPTY()
   5         #define DEFER(id) id EMPTY()
   6
   7         #define EVAL(...) EVAL1(EVAL1(EVAL1(__VA_ARGS__)))
   8         #define EVAL1(...) EVAL2(EVAL2(EVAL2(__VA_ARGS__)))
   9         #define EVAL2(...) EVAL3(EVAL3(EVAL3(__VA_ARGS__)))
  10         #define EVAL3(...) EVAL4(EVAL4(EVAL4(__VA_ARGS__)))
  11         #define EVAL4(...) EVAL5(EVAL5(EVAL5(__VA_ARGS__)))
  12         #define EVAL5(...) __VA_ARGS__
  13
  14         #define OVERLOAD___(F, _16, _15, _14, _13, _12, _11, _10, _9, _8, _7, _6, _5, _4, _3, _2, _1, n, ...) F##_##n
  15         #define OVERLOAD__(F, ...) OVERLOAD___(F,##__VA_ARGS__, 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0)
  16         #define OVERLOAD_(...) DEFER(OVERLOAD__(__VA_ARGS__))
  17         #define OVERLOAD(F, ...) OVERLOAD_(F,##__VA_ARGS__)(__VA_ARGS__)
  18 #else
  19         #define EVAL(...) __VA_ARGS__
  20
  21         #define OVERLOAD_(F, ...) F##_##__VA_COUNT__(__VA_ARGS__)
  22         #define OVERLOAD(F, ...) F##_##__VA_COUNT__(__VA_ARGS__)
  23 #endif
  24
  25 #if defined(CSQC)
  26         #define etof(e) num_for_edict(e)
  27         #define ftoe(i) entitybyindex(i)
  28 #elif defined(SVQC)
  29         #define etof(e) num_for_edict(e)
  30         #define ftoe(i) edict_num(i)
  31 #elif defined(MENUQC)
  32         // already defined
  33 #endif
  34
  35 #define GET(name) name##get
  36 #define GETTER(type, name) type GET(name)() { return name; }
  37 #define PROPERTY(type, name) type name; GETTER(type, name)
  38 #define LAMBDA(...) { __VA_ARGS__; }
  39
  40 // With block may not contain continue or break
  41 #define WITH(type, name, value, block) \
  42         MACRO_BEGIN \
  43         { \
  44                 type __with_save = (name); \
  45                 name = (value); \
  46                 LAMBDA(block) \
  47                 name = __with_save; \
  48         } MACRO_END