diff options
author | Tobias Klauser <tklauser@distanz.ch> | 2008-01-27 11:37:44 +0100 |
---|---|---|
committer | Tobias Klauser <tklauser@xenon.tklauser.home> | 2008-01-27 11:37:44 +0100 |
commit | 7e0f021a9aec35fd8e6725e87e3313b101d26f5e (patch) | |
tree | b1cacc4b24393f517aeb4610e9e1021f954307a8 /reference/C/CONTRIB/SNIP/bitops.c |
Initial import (2.0.2-6)2.0.2-6
Diffstat (limited to 'reference/C/CONTRIB/SNIP/bitops.c')
-rwxr-xr-x | reference/C/CONTRIB/SNIP/bitops.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/reference/C/CONTRIB/SNIP/bitops.c b/reference/C/CONTRIB/SNIP/bitops.c new file mode 100755 index 0000000..1d0c0bc --- /dev/null +++ b/reference/C/CONTRIB/SNIP/bitops.c @@ -0,0 +1,13 @@ +/*
+** Bit set, clear, and test operations
+**
+** public domain snippet by Bob Stout
+*/
+
+typedef enum {ERROR = -1, FALSE, TRUE} LOGICAL;
+
+#define BOOL(x) (!(!(x)))
+
+#define BitSet(arg,posn) ((arg) | (1L << (posn)))
+#define BitClr(arg,posn) ((arg) & ~(1L << (posn)))
+#define BitTst(arg,posn) BOOL((arg) & (1L << (posn)))
|