blob: 655240a856ff4ed5c906b6e42427ddaa2399121d [file] [log] [blame]
Guido van Rossum3f5da241990-12-20 15:06:42 +00001/* Bitset primitives used by the parser generator */
Guido van Rossum85a5fbb1990-10-14 12:07:46 +00002
Guido van Rossum3f5da241990-12-20 15:06:42 +00003#include "pgenheaders.h"
Guido van Rossum85a5fbb1990-10-14 12:07:46 +00004#include "bitset.h"
5
6bitset
7newbitset(nbits)
8 int nbits;
9{
10 int nbytes = NBYTES(nbits);
11 bitset ss = NEW(BYTE, nbytes);
12
13 if (ss == NULL)
14 fatal("no mem for bitset");
15
16 ss += nbytes;
17 while (--nbytes >= 0)
18 *--ss = 0;
19 return ss;
20}
21
22void
23delbitset(ss)
24 bitset ss;
25{
26 DEL(ss);
27}
28
29int
30addbit(ss, ibit)
31 bitset ss;
32 int ibit;
33{
34 int ibyte = BIT2BYTE(ibit);
35 BYTE mask = BIT2MASK(ibit);
36
37 if (ss[ibyte] & mask)
38 return 0; /* Bit already set */
39 ss[ibyte] |= mask;
40 return 1;
41}
42
43#if 0 /* Now a macro */
44int
45testbit(ss, ibit)
46 bitset ss;
47 int ibit;
48{
49 return (ss[BIT2BYTE(ibit)] & BIT2MASK(ibit)) != 0;
50}
51#endif
52
53int
54samebitset(ss1, ss2, nbits)
55 bitset ss1, ss2;
56 int nbits;
57{
58 int i;
59
60 for (i = NBYTES(nbits); --i >= 0; )
61 if (*ss1++ != *ss2++)
62 return 0;
63 return 1;
64}
65
66void
67mergebitset(ss1, ss2, nbits)
68 bitset ss1, ss2;
69 int nbits;
70{
71 int i;
72
73 for (i = NBYTES(nbits); --i >= 0; )
74 *ss1++ |= *ss2++;
75}