mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-09 12:23:04 +00:00
ef01750240
* lib/ebitset.c, lib/ebitset.h, lib/lbitset.c, lib/lbitset.h, * lib/sbitset.c, lib/sbitset.h, lib/bbitset.h: Update from the latest sources from Michael.
149 lines
3.1 KiB
C
149 lines
3.1 KiB
C
/* Bitset vectors.
|
|
Copyright (C) 2001 Free Software Foundation, Inc.
|
|
|
|
This file is part of GCC.
|
|
|
|
GCC is free software; you can redistribute it and/or modify it under
|
|
the terms of the GNU General Public License as published by the Free
|
|
Software Foundation; either version 2, or (at your option) any later
|
|
version.
|
|
|
|
GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
|
WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with GCC; see the file COPYING. If not, write to the Free
|
|
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
|
|
02111-1307, USA. */
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
#include <stdlib.h>
|
|
#include "bitsetv.h"
|
|
|
|
|
|
/* Create a vector of N_VECS bitsets, each of N_BITS, and of
|
|
type TYPE. */
|
|
bitset *
|
|
bitsetv_alloc (n_vecs, n_bits, type)
|
|
unsigned int n_vecs;
|
|
unsigned int n_bits;
|
|
enum bitset_type type;
|
|
{
|
|
unsigned int vector_bytes;
|
|
unsigned int bytes;
|
|
bitset *bsetv;
|
|
unsigned int i;
|
|
|
|
/* Determine number of bytes for each set. */
|
|
bytes = bitset_bytes (type, n_bits);
|
|
|
|
/* Allocate vector table at head of bitset array. */
|
|
vector_bytes = (n_vecs + 1) * sizeof (bitset);
|
|
bsetv = (bitset *) xcalloc (1, vector_bytes + bytes * n_vecs);
|
|
|
|
for (i = 0; i < n_vecs; i++)
|
|
{
|
|
bsetv[i] = (bitset) ((char *) bsetv + vector_bytes + i * bytes);
|
|
|
|
bitset_init (bsetv[i], n_bits, type);
|
|
}
|
|
|
|
/* Null terminate table. */
|
|
bsetv[i] = 0;
|
|
return bsetv;
|
|
}
|
|
|
|
|
|
/* Create a vector of N_VECS bitsets, each of N_BITS, and with
|
|
attribute hints specified by ATTR. */
|
|
bitset *
|
|
bitsetv_create (n_vecs, n_bits, attr)
|
|
unsigned int n_vecs;
|
|
unsigned int n_bits;
|
|
unsigned int attr;
|
|
{
|
|
enum bitset_type type;
|
|
|
|
type = bitset_type_choose (n_bits, attr);
|
|
return bitsetv_alloc (n_vecs, n_bits, type);
|
|
}
|
|
|
|
|
|
/* Free bitset vector BSETV. */
|
|
void
|
|
bitsetv_free (bsetv)
|
|
bitset *bsetv;
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0; bsetv[i]; i++)
|
|
BITSET_FREE_ (bsetv[i]);
|
|
free (bsetv);
|
|
}
|
|
|
|
|
|
/* Zero a vector of bitsets. */
|
|
void
|
|
bitsetv_zero (bsetv)
|
|
struct bitset_struct **bsetv;
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0; bsetv[i]; i++)
|
|
bitset_zero (bsetv[i]);
|
|
}
|
|
|
|
|
|
/* Set a vector of bitsets to ones. */
|
|
void
|
|
bitsetv_ones (bsetv)
|
|
bitset *bsetv;
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0; bsetv[i]; i++)
|
|
bitset_ones (bsetv[i]);
|
|
}
|
|
|
|
|
|
/* Dump the contents of a bitset vector BSETV with N_VECS elements to
|
|
FILE. */
|
|
void
|
|
bitsetv_dump (file, title, subtitle, bsetv)
|
|
FILE *file;
|
|
const char *title, *subtitle;
|
|
bitset *bsetv;
|
|
{
|
|
unsigned int i;
|
|
|
|
fprintf (file, "%s\n", title);
|
|
for (i = 0; bsetv[i]; i++)
|
|
{
|
|
fprintf (file, "%s %d\n", subtitle, i);
|
|
bitset_dump (file, bsetv[i]);
|
|
}
|
|
|
|
fprintf (file, "\n");
|
|
}
|
|
|
|
|
|
void
|
|
debug_bitsetv (bsetv)
|
|
bitset *bsetv;
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0; bsetv[i]; i++)
|
|
{
|
|
fprintf (stderr, "%d: ", i);
|
|
debug_bitset (bsetv[i]);
|
|
}
|
|
|
|
fprintf (stderr, "\n");
|
|
}
|