qcsrc/common/util-pre.qh

   1 #ifndef UTIL_PRE_H
   2 #define UTIL_PRE_H
   3
   4 #ifndef NOCOMPAT
   5     #define COMPAT_NO_MOD_IS_XONOTIC
   6 #endif
   7
   8 #ifndef QCC_SUPPORT_ACCUMULATE
   9     #ifdef GMQCC
  10         #define QCC_SUPPORT_ACCUMULATE
  11     #endif
  12 #endif
  13
  14 #ifndef QCC_SUPPORT_NIL
  15     #ifdef GMQCC
  16         #define QCC_SUPPORT_NIL
  17     #endif
  18 #endif
  19
  20 #ifndef QCC_SUPPORT_INT
  21     #define int float
  22
  23     #define stoi(s) stof(s)
  24     #define stob(s) stof(s)
  25     #define itos(i) ftos(i)
  26 #else
  27     #define stoi(s) ((int) stof(s))
  28     #define stob(s) ((bool) stof(s))
  29     #define itos(i) ftos(i)
  30 #endif
  31
  32 #ifndef QCC_SUPPORT_BOOL
  33     #define bool float
  34
  35     // Boolean Constants
  36     const int true      = 1;
  37     const int false = 0;
  38 #endif
  39
  40 // Transitional aliases
  41 [[deprecated("use true")]] [[alias("true")]] const bool TRUE;
  42 [[deprecated("use false")]] [[alias("false")]] const bool FALSE;
  43
  44 #define FOREACH_ARRAY(arr, start, end, cond, body) do { \
  45     for (int i = start; i < end; ++i) {                 \
  46         const noref entity it = arr[i];                 \
  47         if (cond) { body }                              \
  48     }                                                   \
  49 } while(0)
  50
  51 #define FOREACH_LIST(list, next, cond, body) do {               \
  52     noref int i = 0;                                            \
  53     for (entity it = list##_first; it; (it = it.next, ++i)) {   \
  54         if (cond) { body }                                      \
  55     }                                                           \
  56 } while(0)
  57
  58 #define FOREACH(list, cond, body) FOREACH_LIST(list, enemy, cond, body)
  59
  60 #ifdef GMQCC
  61     #define OVERLOAD(F, ...) F##_##__VA_COUNT__(__VA_ARGS__)
  62 #else
  63     #define OVERLOAD_(F,_9,_8,_7,_6,_5,_4,_3,_2,_1,n,...) F##_##n
  64     #define OVERLOAD(F, ...) OVERLOAD_(F,__VA_ARGS__,9,8,7,6,5,4,3,2,1)(__VA_ARGS__)
  65 #endif
  66
  67 #define LAMBDA(...) { __VA_ARGS__ ; }
  68
  69 #define MAP(f, ...) OVERLOAD(MAP, f, __VA_ARGS__)
  70 #define MAP_2(f, it) f(it)
  71 #define MAP_3(f, it, ...) f(it)MAP_2(f, __VA_ARGS__)
  72 #define MAP_4(f, it, ...) f(it)MAP_3(f, __VA_ARGS__)
  73 #define MAP_5(f, it, ...) f(it)MAP_4(f, __VA_ARGS__)
  74 #define MAP_6(f, it, ...) f(it)MAP_5(f, __VA_ARGS__)
  75 #define MAP_7(f, it, ...) f(it)MAP_6(f, __VA_ARGS__)
  76 #define MAP_8(f, it, ...) f(it)MAP_7(f, __VA_ARGS__)
  77 #define MAP_9(f, it, ...) f(it)MAP_8(f, __VA_ARGS__)
  78 #define MAP_10(f, it, ...) f(it)MAP_9(f, __VA_ARGS__)
  79 #define MAP_11(f, it, ...) f(it)MAP_10(f, __VA_ARGS__)
  80 #define MAP_12(f, it, ...) f(it)MAP_11(f, __VA_ARGS__)
  81 #define MAP_13(f, it, ...) f(it)MAP_12(f, __VA_ARGS__)
  82 #define MAP_14(f, it, ...) f(it)MAP_13(f, __VA_ARGS__)
  83 #define MAP_15(f, it, ...) f(it)MAP_14(f, __VA_ARGS__)
  84 #define MAP_16(f, it, ...) f(it)MAP_15(f, __VA_ARGS__)
  85 #define MAP_17(f, it, ...) f(it)MAP_16(f, __VA_ARGS__)
  86 #define MAP_18(f, it, ...) f(it)MAP_17(f, __VA_ARGS__)
  87 #define MAP_19(f, it, ...) f(it)MAP_18(f, __VA_ARGS__)
  88 #define MAP_20(f, it, ...) f(it)MAP_19(f, __VA_ARGS__)
  89
  90 #define IDENTITY(it) it
  91
  92 #define UNWORDS(...) MAP(IDENTITY, __VA_ARGS__)
  93
  94 #define APPLY(f, ...) f(__VA_ARGS__)
  95
  96 #ifdef SVQC
  97     #define SV(f, ...) f(__VA_ARGS__)
  98 #else
  99     #define SV(f, ...)
 100 #endif
 101
 102 #ifdef CSQC
 103     #define CL(f, ...) f(__VA_ARGS__)
 104 #else
 105     #define CL(f, ...)
 106 #endif
 107
 108 #define IF(cond, f, ...) cond(f, __VA_ARGS__)
 109
 110 #define GET(name) name##get
 111 #define GETTER(type, name) type GET(name)() { return name; }
 112
 113 #define BIT(n) (1 << (n))
 114 #ifndef BRANCHLESS_BITSET
 115     #define BITSET(var, mask, flag) (flag ? (var) | (mask) : (var) &~ (mask))
 116 #else
 117     #define BITSET(var, mask, flag) ((var) ^ (-(flag) ^ (var)) & (mask))
 118 #endif
 119
 120 #endif