diff options
Diffstat (limited to 'zahl-internals.h')
| -rw-r--r-- | zahl-internals.h | 170 |
1 files changed, 0 insertions, 170 deletions
diff --git a/zahl-internals.h b/zahl-internals.h deleted file mode 100644 index 5c9cc5e..0000000 --- a/zahl-internals.h +++ /dev/null @@ -1,170 +0,0 @@ -/* See LICENSE file for copyright and license details. */ - -#ifndef ZAHL_INLINE -# if defined(__STDC_VERSION__) && __STDC_VERSION__ >= 199901L -# define ZAHL_INLINE static inline -# else -# define ZAHL_INLINE static -# endif -#endif - - -#if defined(__GNUC__) || defined(__clang__) -# define ZAHL_LIKELY(expr) __builtin_expect(!!(expr), 1) -# define ZAHL_UNLIKELY(expr) __builtin_expect(!!(expr), 0) -# define ZAHL_CONST_P(value) __builtin_constant_p(value) -#else -# define ZAHL_LIKELY(expr) (expr) -# define ZAHL_UNLIKELY(expr) (expr) -#endif - - -#if defined(__GNUC__) && !defined(__clang__) -# define ZAHL_O0 __attribute__((optimize("O0"))) -# define ZAHL_O1 __attribute__((optimize("O1"))) -# define ZAHL_O2 __attribute__((optimize("O2"))) -# define ZAHL_O3 __attribute__((optimize("O3"))) -# define ZAHL_Ofast __attribute__((optimize("Ofast"))) -# define ZAHL_Os __attribute__((optimize("Os"))) -# define ZAHL_Oz __attribute__((optimize("Os"))) -#elif defined(__clang__) -# define ZAHL_O0 __attribute__((optnone)) -# define ZAHL_O1 /* Don't know how. */ -# define ZAHL_O2 /* Don't know how. */ -# define ZAHL_O3 /* Don't know how. */ -# define ZAHL_Ofast /* Don't know how. */ -# define ZAHL_Os /* Don't know how. */ -# define ZAHL_Oz /* Don't know how. */ -#else -# define ZAHL_O0 /* Don't know how. */ -# define ZAHL_O1 /* Don't know how. */ -# define ZAHL_O2 /* Don't know how. */ -# define ZAHL_O3 /* Don't know how. */ -# define ZAHL_Ofast /* Don't know how. */ -# define ZAHL_Os /* Don't know how. */ -# define ZAHL_Oz /* Don't know how. */ -#endif -/* Mostly ZAHL_O2, but sometimes ZAHL_O3, are useful. - * But note, often it optimal to not use any of them. */ - - -#define ZAHL_BITS_PER_CHAR 64 -#define ZAHL_LB_BITS_PER_CHAR 6 -#define ZAHL_CHAR_MAX UINT64_MAX -/* Note: These cannot be changed willy-nilly, some code depends - * on them, be cause being flexible would just be too painful. */ - - -#define ZAHL_FLOOR_BITS_TO_CHARS(bits) ((bits) >> ZAHL_LB_BITS_PER_CHAR) -#define ZAHL_CEILING_BITS_TO_CHARS(bits) (((bits) + (ZAHL_BITS_PER_CHAR - 1)) >> ZAHL_LB_BITS_PER_CHAR) -#define ZAHL_BITS_IN_LAST_CHAR(bits) ((bits) & (ZAHL_BITS_PER_CHAR - 1)) -#define ZAHL_TRUNCATE_TO_CHAR(bits) ((bits) & ~(size_t)(ZAHL_BITS_PER_CHAR - 1)) - - -#define ZAHL_SET_SIGNUM(a, signum) ((a)->sign = (signum)) -#define ZAHL_SET(a, b) do { if ((a) != (b)) zset(a, b); } while (0) -#define ZAHL_ENSURE_SIZE(a, n) do { if ((a)->alloced < (n)) libzahl_realloc(a, (n)); } while (0) -#define ZAHL_TRIM(a) for (; (a)->used && !(a)->chars[(a)->used - 1]; (a)->used--) -#define ZAHL_TRIM_NONZERO(a) for (; !(a)->chars[(a)->used - 1]; (a)->used--) -#define ZAHL_TRIM_AND_ZERO(a) do { ZAHL_TRIM(a); if (!(a)->used) ZAHL_SET_SIGNUM(a, 0); } while (0) -#define ZAHL_TRIM_AND_SIGN(a, s) do { ZAHL_TRIM(a); ZAHL_SET_SIGNUM(a, (a)->used ? (s) : 0); } while (0) -#define ZAHL_SWAP(a, b, t, m) ((t)->m = (a)->m, (a)->m = (b)->m, (b)->m = (t)->m) - - -#if defined(__GNUC__) || defined(__clang__) -# if ZAHL_CHAR_MAX == LONG_MAX -# define ZAHL_ADD_CTZ(r, x) ((r) += (size_t)__builtin_ctzl(x)) -# define ZAHL_SUB_CLZ(r, x) ((r) -= (size_t)__builtin_clzl(x)) -# else -# define ZAHL_ADD_CTZ(r, x) ((r) += (size_t)__builtin_ctzll(x)) -# define ZAHL_SUB_CLZ(r, x) ((r) -= (size_t)__builtin_clzll(x)) -# endif -#else -# define ZAHL_ADD_CTZ(r, x) \ - do { \ - zahl_char_t zahl_x__ = (x); \ - for (; zahl_x__ & 1; zahl_x__ >>= 1, (r)++); \ - } while (0) -# define ZAHL_SUB_CLZ(r, x) \ - do { \ - zahl_char_t zahl_x__ = (x); \ - (r) -= 8 * sizeof(zahl_char_t); \ - for (; zahl_x__; zahl_x__ >>= 1, (r)++); \ - } while (0) -#endif - - -typedef uint64_t zahl_char_t; - -struct zahl { - int sign; -#if INT_MAX != LONG_MAX - int padding__; -#endif - size_t used; - size_t alloced; - zahl_char_t *chars; -}; - - -void libzahl_realloc(struct zahl *, size_t); - -ZAHL_INLINE void -libzahl_memcpy(register zahl_char_t *d, register const zahl_char_t *s, size_t n) -{ - size_t i; - if (n <= 4) { - if (n >= 1) - d[0] = s[0]; - if (n >= 2) - d[1] = s[1]; - if (n >= 3) - d[2] = s[2]; - if (n >= 4) - d[3] = s[3]; - } else { - for (i = 0; (i += 4) <= n;) { - d[i - 4] = s[i - 4]; - d[i - 3] = s[i - 3]; - d[i - 2] = s[i - 2]; - d[i - 1] = s[i - 1]; - } - if (i > n) { - i -= 4; - if (i < n) - d[i] = s[i], i++; - if (i < n) - d[i] = s[i], i++; - if (i < n) - d[i] = s[i], i++; - if (i < n) - d[i] = s[i]; - } - } -} - -ZAHL_INLINE void -libzahl_memset(register zahl_char_t *a, register zahl_char_t v, size_t n) -{ - size_t i; - if (n <= 4) { - if (n >= 1) - a[0] = v; - if (n >= 2) - a[1] = v; - if (n >= 3) - a[2] = v; - if (n >= 4) - a[3] = v; - } else { - for (i = 0; (i += 4) <= n;) { - a[i - 1] = v; - a[i - 2] = v; - a[i - 3] = v; - a[i - 4] = v; - } - if (i > n) - for (i -= 4; i < n; i++) - a[i] = v; - } -} |