X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/6aa452a643c65a8df244013e05d41854531ec762..e3aa65c5029363d43f09cfaec92da0e38190042a:/lib/bitset.c diff --git a/lib/bitset.c b/lib/bitset.c index 4a0f9c02..82517d9e 100644 --- a/lib/bitset.c +++ b/lib/bitset.c @@ -30,17 +30,13 @@ const char * const bitset_type_names[] = BITSET_TYPE_NAMES; -static void bitset_print PARAMS ((FILE *, bitset, int)); - /* Return number of bytes required to create a N_BIT bitset of TYPE. The bitset may grow to require more bytes than this. */ -int -bitset_bytes (type, n_bits) - enum bitset_type type; - bitset_bindex n_bits; +size_t +bitset_bytes (enum bitset_type type, bitset_bindex n_bits) { - unsigned int bytes; + size_t bytes; if (bitset_stats_enabled) return bitset_stats_bytes (); @@ -69,14 +65,11 @@ bitset_bytes (type, n_bits) /* Initialise bitset BSET of TYPE for N_BITS. */ bitset -bitset_init (bset, n_bits, type) - bitset bset; - bitset_bindex n_bits; - enum bitset_type type; +bitset_init (bitset bset, bitset_bindex n_bits, enum bitset_type type) { if (bitset_stats_enabled) return bitset_stats_init (bset, n_bits, type); - + switch (type) { case BITSET_ARRAY: @@ -98,9 +91,7 @@ bitset_init (bset, n_bits, type) specified by ATTR. For variable size bitsets, N_BITS is only a hint and may be zero. */ enum bitset_type -bitset_type_choose (n_bits, attr) - bitset_bindex n_bits ATTRIBUTE_UNUSED; - unsigned int attr; +bitset_type_choose (bitset_bindex n_bits ATTRIBUTE_UNUSED, unsigned int attr) { enum bitset_type type; @@ -128,11 +119,9 @@ bitset_type_choose (n_bits, attr) /* Create a bitset of N_BITS of type TYPE. */ bitset -bitset_alloc (n_bits, type) - bitset_bindex n_bits; - enum bitset_type type; +bitset_alloc (bitset_bindex n_bits, enum bitset_type type) { - unsigned int bytes; + size_t bytes; bitset bset; bytes = bitset_bytes (type, n_bits); @@ -149,12 +138,10 @@ bitset_alloc (n_bits, type) /* Create a bitset of N_BITS of type TYPE. */ bitset -bitset_obstack_alloc (bobstack, n_bits, type) - struct obstack *bobstack; - bitset_bindex n_bits; - enum bitset_type type; +bitset_obstack_alloc (struct obstack *bobstack, + bitset_bindex n_bits, enum bitset_type type) { - unsigned int bytes; + size_t bytes; bitset bset; bytes = bitset_bytes (type, n_bits); @@ -169,9 +156,7 @@ bitset_obstack_alloc (bobstack, n_bits, type) /* Create a bitset of N_BITS and with attribute hints specified by ATTR. */ bitset -bitset_create (n_bits, attr) - bitset_bindex n_bits; - unsigned int attr; +bitset_create (bitset_bindex n_bits, unsigned int attr) { enum bitset_type type; @@ -183,8 +168,7 @@ bitset_create (n_bits, attr) /* Free bitset BSET. */ void -bitset_free (bset) - bitset bset; +bitset_free (bitset bset) { BITSET_FREE_ (bset); free (bset); @@ -193,8 +177,7 @@ bitset_free (bset) /* Free bitset BSET allocated on obstack. */ void -bitset_obstack_free (bset) - bitset bset; +bitset_obstack_free (bitset bset) { BITSET_FREE_ (bset); } @@ -202,23 +185,21 @@ bitset_obstack_free (bset) /* Return bitset type. */ enum bitset_type -bitset_type_get (bset) - bitset bset; +bitset_type_get (bitset bset) { enum bitset_type type; type = BITSET_TYPE_ (bset); if (type != BITSET_STATS) return type; - + return bitset_stats_type_get (bset); } /* Return name of bitset type. */ const char * -bitset_type_name_get (bset) - bitset bset; +bitset_type_name_get (bitset bset) { enum bitset_type type; @@ -229,50 +210,44 @@ bitset_type_name_get (bset) /* Find next bit set in SRC starting from and including BITNO. - Return -1 if SRC empty. */ -int -bitset_next (src, bitno) - bitset src; - bitset_bindex bitno; + Return BITSET_BINDEX_MAX if SRC empty. */ +bitset_bindex +bitset_next (bitset src, bitset_bindex bitno) { bitset_bindex val; bitset_bindex next = bitno; if (!bitset_list (src, &val, 1, &next)) - return -1; + return BITSET_BINDEX_MAX; return val; } /* Find previous bit set in SRC starting from and including BITNO. - Return -1 if SRC empty. */ -int -bitset_prev (src, bitno) - bitset src; - bitset_bindex bitno; + Return BITSET_BINDEX_MAX if SRC empty. */ +bitset_bindex +bitset_prev (bitset src, bitset_bindex bitno) { bitset_bindex val; bitset_bindex next = bitno; if (!bitset_list_reverse (src, &val, 1, &next)) - return -1; + return BITSET_BINDEX_MAX; return val; } /* Find first set bit. */ -int -bitset_first (src) - bitset src; +bitset_bindex +bitset_first (bitset src) { return bitset_next (src, 0); } /* Find last set bit. */ -int -bitset_last (src) - bitset src; +bitset_bindex +bitset_last (bitset src) { return bitset_prev (src, 0); } @@ -280,9 +255,7 @@ bitset_last (src) /* Return non-zero if BITNO in SRC is the only set bit. */ int -bitset_only_set_p (src, bitno) - bitset src; - bitset_bindex bitno; +bitset_only_set_p (bitset src, bitset_bindex bitno) { bitset_bindex val[2]; bitset_bindex next = 0; @@ -295,17 +268,15 @@ bitset_only_set_p (src, bitno) /* Print contents of bitset BSET to FILE. */ static void -bitset_print (file, bset, verbose) - FILE *file; - bitset bset; - int verbose; +bitset_print (FILE *file, bitset bset, int verbose) { unsigned int pos; bitset_bindex i; bitset_iterator iter; if (verbose) - fprintf (file, "n_bits = %d, set = {", bitset_size (bset)); + fprintf (file, "n_bits = %lu, set = {", + (unsigned long) bitset_size (bset)); pos = 30; BITSET_FOR_EACH (iter, bset, i, 0) @@ -327,9 +298,7 @@ bitset_print (file, bset, verbose) /* Dump bitset BSET to FILE. */ void -bitset_dump (file, bset) - FILE *file; - bitset bset; +bitset_dump (FILE *file, bitset bset) { bitset_print (file, bset, 0); } @@ -338,7 +307,7 @@ bitset_dump (file, bset) /* Release memory associated with bitsets. */ void -bitset_release_memory () +bitset_release_memory (void) { lbitset_release_memory (); ebitset_release_memory (); @@ -348,9 +317,7 @@ bitset_release_memory () /* Toggle bit BITNO in bitset BSET and return non-zero if not set. */ int -bitset_toggle_ (bset, bitno) - bitset bset; - bitset_bindex bitno; +bitset_toggle_ (bitset bset, bitset_bindex bitno) { /* This routine is for completeness. It could be optimized if required. */ @@ -368,15 +335,14 @@ bitset_toggle_ (bset, bitno) /* Return number of bits set in bitset SRC. */ -int -bitset_count_ (src) - bitset src; +bitset_bindex +bitset_count_ (bitset src) { bitset_bindex list[BITSET_LIST_SIZE]; bitset_bindex next; - int num; - int count; - + bitset_bindex num; + bitset_bindex count; + /* This could be greatly sped up by adding a count method for each bitset implementation that uses a direct technique (based on masks) for counting the number of bits set in a word. */ @@ -385,18 +351,16 @@ bitset_count_ (src) for (count = 0; (num = bitset_list (src, list, BITSET_LIST_SIZE, &next)); count += num) continue; - + return count; } -/* DST = SRC. Return non-zero if DST != SRC. +/* DST = SRC. Return non-zero if DST != SRC. This is a fallback for the case where SRC and DST are different bitset types. */ int -bitset_copy_ (dst, src) - bitset dst; - bitset src; +bitset_copy_ (bitset dst, bitset src) { bitset_bindex i; bitset_iterator iter; @@ -416,12 +380,8 @@ bitset_copy_ (dst, src) /* This is a fallback for implementations that do not support four operand operations. */ static inline int -bitset_op4_cmp (dst, src1, src2, src3, op) - bitset dst; - bitset src1; - bitset src2; - bitset src3; - enum bitset_ops op; +bitset_op4_cmp (bitset dst, bitset src1, bitset src2, bitset src3, + enum bitset_ops op) { int changed = 0; int stats_enabled_save; @@ -459,40 +419,52 @@ bitset_op4_cmp (dst, src1, src2, src3, op) } +/* DST = (SRC1 & SRC2) | SRC3. */ +void +bitset_and_or_ (bitset dst, bitset src1, bitset src2, bitset src3) +{ + bitset_and_or_cmp_ (dst, src1, src2, src3); +} + + /* DST = (SRC1 & SRC2) | SRC3. Return non-zero if DST != (SRC1 & SRC2) | SRC3. */ int -bitset_and_or_cmp_ (dst, src1, src2, src3) - bitset dst; - bitset src1; - bitset src2; - bitset src3; +bitset_and_or_cmp_ (bitset dst, bitset src1, bitset src2, bitset src3) { return bitset_op4_cmp (dst, src1, src2, src3, BITSET_OP_AND_OR); } +/* DST = (SRC1 & ~SRC2) | SRC3. */ +void +bitset_andn_or_ (bitset dst, bitset src1, bitset src2, bitset src3) +{ + bitset_andn_or_cmp_ (dst, src1, src2, src3); +} + + /* DST = (SRC1 & ~SRC2) | SRC3. Return non-zero if DST != (SRC1 & ~SRC2) | SRC3. */ int -bitset_andn_or_cmp_ (dst, src1, src2, src3) - bitset dst; - bitset src1; - bitset src2; - bitset src3; +bitset_andn_or_cmp_ (bitset dst, bitset src1, bitset src2, bitset src3) { return bitset_op4_cmp (dst, src1, src2, src3, BITSET_OP_ANDN_OR); } +/* DST = (SRC1 | SRC2) & SRC3. */ +void +bitset_or_and_ (bitset dst, bitset src1, bitset src2, bitset src3) +{ + bitset_or_and_cmp_ (dst, src1, src2, src3); +} + + /* DST = (SRC1 | SRC2) & SRC3. Return non-zero if DST != (SRC1 | SRC2) & SRC3. */ int -bitset_or_and_cmp_ (dst, src1, src2, src3) - bitset dst; - bitset src1; - bitset src2; - bitset src3; +bitset_or_and_cmp_ (bitset dst, bitset src1, bitset src2, bitset src3) { return bitset_op4_cmp (dst, src1, src2, src3, BITSET_OP_OR_AND); } @@ -500,8 +472,7 @@ bitset_or_and_cmp_ (dst, src1, src2, src3) /* Function to be called from debugger to print bitset. */ void -debug_bitset (bset) - bitset bset; +debug_bitset (bitset bset) { if (bset) bitset_print (stderr, bset, 1);