From 3ae8c069900514c1785fe4a84b6cdb0157dff59e Mon Sep 17 00:00:00 2001 From: Mattias Andrée Date: Wed, 2 Mar 2016 21:07:08 +0100 Subject: Add zand, zor, zxor, znot, zbtest, zsplit, and the newly introduced ztrunc MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Mattias Andrée --- src/zbtest.c | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) create mode 100644 src/zbtest.c (limited to 'src/zbtest.c') diff --git a/src/zbtest.c b/src/zbtest.c new file mode 100644 index 0000000..8e9f8ff --- /dev/null +++ b/src/zbtest.c @@ -0,0 +1,18 @@ +/* See LICENSE file for copyright and license details. */ +#include "internals" + + +int +zbtest(z_t a, size_t bit) +{ + size_t chars; + if (zzero(a)) + return 0; + + chars = bit >> LB_BITS_PER_CHAR; + if (chars >= a->used) + return 0; + + bit &= BITS_PER_CHAR - 1; + return (a->chars[chars] >> bit) & 1; +} -- cgit v1.2.3-70-g09d2