mirror of
https://github.com/urbit/shrub.git
synced 2024-12-27 06:02:27 +03:00
93 lines
2.6 KiB
C
93 lines
2.6 KiB
C
/* include/c/defs.h
|
|
**
|
|
** This file is in the public domain.
|
|
*/
|
|
/** Loobeans - inverse booleans to match nock.
|
|
**/
|
|
# define c3y 0
|
|
# define c3n 1
|
|
|
|
# define _(x) (c3y == (x))
|
|
# define __(x) ((x) ? c3y : c3n)
|
|
# define c3a(x, y) __(_(x) && _(y))
|
|
# define c3o(x, y) __(_(x) || _(y))
|
|
|
|
|
|
/** Random useful C macros.
|
|
**/
|
|
/* Assert. Good to capture.
|
|
*/
|
|
// # define c3_assert(x) assert(x)
|
|
# define c3_assert(x) ( (x) ? 0 : c3_cooked(), assert(x) )
|
|
|
|
/* Stub.
|
|
*/
|
|
# define c3_stub (assert(!"stub"), 0)
|
|
|
|
/* Size in words.
|
|
*/
|
|
# define c3_wiseof(x) (((sizeof (x)) + 3) >> 2)
|
|
|
|
/* Bit counting.
|
|
*/
|
|
# define c3_bits_word(w) ((w) ? (32 - __builtin_clz(w)) : 0)
|
|
|
|
/* Min and max.
|
|
*/
|
|
# define c3_max(x, y) ( ((x) > (y)) ? (x) : (y) )
|
|
# define c3_min(x, y) ( ((x) < (y)) ? (x) : (y) )
|
|
|
|
/* Rotate.
|
|
*/
|
|
# define c3_rotw(r, x) ( ((x) << (r)) | ((x) >> (32 - (r))) )
|
|
|
|
/* Emergency stdio fix.
|
|
*/
|
|
int
|
|
c3_cooked();
|
|
|
|
/* Short integers.
|
|
*/
|
|
# define c3_s1(a) ( (a) )
|
|
# define c3_s2(a, b) ( ((b) << 8) | c3_s1(a) )
|
|
# define c3_s3(a, b, c) ( ((c) << 16) | c3_s2(a, b) )
|
|
# define c3_s4(a, b, c, d) ( ((d) << 24) | c3_s3(a, b, c) )
|
|
|
|
# define c3_s5(a, b, c, d, e) \
|
|
( ((uint64_t)c3_s1(e) << 32ULL) | c3_s4(a, b, c, d) )
|
|
# define c3_s6(a, b, c, d, e, f) \
|
|
( ((uint64_t)c3_s2(e, f) << 32ULL) | c3_s4(a, b, c, d) )
|
|
# define c3_s7(a, b, c, d, e, f, g) \
|
|
( ((uint64_t)c3_s3(e, f, g) << 32ULL) | c3_s4(a, b, c, d) )
|
|
# define c3_s8(a, b, c, d, e, f, g, h) \
|
|
( ((uint64_t)c3_s4(e, f, g, h) << 32ULL) | c3_s4(a, b, c, d) )
|
|
|
|
/* Byte-order twiddling.
|
|
*/
|
|
# define c3_flip32(w) \
|
|
( (((w) >> 24) & 0xff) \
|
|
| (((w) >> 16) & 0xff) << 8 \
|
|
| (((w) >> 8) & 0xff) << 16 \
|
|
| ( (w) & 0xff) << 24 )
|
|
|
|
/* Logging shorthand.
|
|
*/
|
|
# define c3_log_every(n, args...) \
|
|
do { \
|
|
static c3_w cnt_w = 0; \
|
|
\
|
|
if ( 0 == cnt_w % (n) ) { \
|
|
uL(fprintf(uH, args)); \
|
|
} \
|
|
cnt_w = (cnt_w + 1) % (n); \
|
|
} while (0)
|
|
|
|
/* c3_malloc(): asserting malloc
|
|
*/
|
|
#define c3_malloc(s) ({ \
|
|
void* rut = malloc(s); \
|
|
if ( 0 == rut ) { \
|
|
c3_assert(!"memory lost"); \
|
|
} \
|
|
rut;})
|