[bison.git] / src / muscle_tab.h

/* Muscle table manager for Bison,
   Copyright (C) 2001, 2002 Free Software Foundation, Inc.

   This file is part of Bison, the GNU Compiler Compiler.

   Bison 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.

   Bison 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 Bison; see the file COPYING.  If not, write to
   the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
   Boston, MA 02111-1307, USA.  */

#ifndef MUSCLE_TAB_H_
# define MUSCLE_TAB_H_

typedef struct muscle_entry_s
{
  const char *key;
  char *value;
} muscle_entry_t;

void muscle_init PARAMS ((void));
void muscle_insert PARAMS ((const char *key, char *value));
char *muscle_find PARAMS ((const char *key));
void muscle_free PARAMS ((void));


/* An obstack dedicated to receive muscle keys and values.  */
extern struct obstack muscle_obstack;

#define MUSCLE_INSERT_INT(Key, Value)				\
{								\
  obstack_fgrow1 (&muscle_obstack, "%d", Value);	       	\
  obstack_1grow (&muscle_obstack, 0);				\
  muscle_insert (Key, obstack_finish (&muscle_obstack));	\
}

#define MUSCLE_INSERT_LONG_INT(Key, Value)			\
{								\
  obstack_fgrow1 (&muscle_obstack, "%ld", Value);	       	\
  obstack_1grow (&muscle_obstack, 0);				\
  muscle_insert (Key, obstack_finish (&muscle_obstack));	\
}

#define MUSCLE_INSERT_STRING(Key, Value)			\
{								\
  obstack_sgrow (&muscle_obstack, Value);			\
  obstack_1grow (&muscle_obstack, 0);				\
  muscle_insert (Key, obstack_finish (&muscle_obstack));	\
}

#define MUSCLE_GROW_STRING_PAIR(Key, Value1, Value2)		\
{								\
  obstack_sgrow (&muscle_obstack, Value1);			\
  obstack_1grow (&muscle_obstack, 0);				\
  muscle_insert (Key, obstack_finish (&muscle_obstack));	\
}

/* Insert (KEY, VALUE).  If KEY already existed, overwrite the
   previous value.  Uses MUSCLE_OBSTACK.  De-allocates the previously
   associated value.  VALUE and SEPARATOR are copied.  */

void muscle_grow PARAMS ((const char *key,
			  const char *value, const char *separator));

/* MUSCLE is an M4 list of pairs.  Create or extend it with the pair
   (A1, A2).  Note that because the muscle values are output *double*
   quoted, one needs to strip the first level of quotes to reach the
   list itself.  */

void muscle_pair_list_grow PARAMS ((const char *muscle,
				    const char *a1, const char *a2));

void muscles_m4_output PARAMS ((FILE *out));

#endif /* not MUSCLE_TAB_H_ */
Commit	Line	Data
ae7453f2	1	/* Muscle table manager for Bison,
be2a1a68	2	Copyright (C) 2001, 2002 Free Software Foundation, Inc.
f753cd62 MA	3
	4	This file is part of Bison, the GNU Compiler Compiler.
	5
	6	Bison is free software; you can redistribute it and/or modify
	7	it under the terms of the GNU General Public License as published by
	8	the Free Software Foundation; either version 2, or (at your option)
	9	any later version.
	10
	11	Bison is distributed in the hope that it will be useful,
	12	but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	GNU General Public License for more details.
	15
	16	You should have received a copy of the GNU General Public License
	17	along with Bison; see the file COPYING. If not, write to
	18	the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
	19	Boston, MA 02111-1307, USA. */
	20
	21	#ifndef MUSCLE_TAB_H_
f7737e2e	22	# define MUSCLE_TAB_H_
f753cd62	23
f753cd62 MA	24	typedef struct muscle_entry_s
	25	{
	26	const char *key;
ae7453f2	27	char *value;
f753cd62 MA	28	} muscle_entry_t;
	29
	30	void muscle_init PARAMS ((void));
ae7453f2 AD	31	void muscle_insert PARAMS ((const char key, char value));
ae7453f2 AD	32	char muscle_find PARAMS ((const char key));
592e8d4d AD	33	void muscle_free PARAMS ((void));
	34
	35
	36	/* An obstack dedicated to receive muscle keys and values. */
	37	extern struct obstack muscle_obstack;
f753cd62	38
9b3add5b RA	39	#define MUSCLE_INSERT_INT(Key, Value) \
	40	{ \
	41	obstack_fgrow1 (&muscle_obstack, "%d", Value); \
	42	obstack_1grow (&muscle_obstack, 0); \
	43	muscle_insert (Key, obstack_finish (&muscle_obstack)); \
	44	}
	45
680e8701 AD	46	#define MUSCLE_INSERT_LONG_INT(Key, Value) \
	47	{ \
	48	obstack_fgrow1 (&muscle_obstack, "%ld", Value); \
	49	obstack_1grow (&muscle_obstack, 0); \
	50	muscle_insert (Key, obstack_finish (&muscle_obstack)); \
	51	}
	52
9b3add5b RA	53	#define MUSCLE_INSERT_STRING(Key, Value) \
	54	{ \
	55	obstack_sgrow (&muscle_obstack, Value); \
	56	obstack_1grow (&muscle_obstack, 0); \
	57	muscle_insert (Key, obstack_finish (&muscle_obstack)); \
	58	}
	59
ae7453f2 AD	60	#define MUSCLE_GROW_STRING_PAIR(Key, Value1, Value2) \
	61	{ \
	62	obstack_sgrow (&muscle_obstack, Value1); \
	63	obstack_1grow (&muscle_obstack, 0); \
	64	muscle_insert (Key, obstack_finish (&muscle_obstack)); \
9b3add5b RA	65	}
9b3add5b RA	66
ae7453f2 AD	67	/* Insert (KEY, VALUE). If KEY already existed, overwrite the
	68	previous value. Uses MUSCLE_OBSTACK. De-allocates the previously
	69	associated value. VALUE and SEPARATOR are copied. */
	70
	71	void muscle_grow PARAMS ((const char *key,
	72	const char value, const char separator));
	73
	74	/* MUSCLE is an M4 list of pairs. Create or extend it with the pair
	75	(A1, A2). Note that because the muscle values are output double
	76	quoted, one needs to strip the first level of quotes to reach the
	77	list itself. */
	78
	79	void muscle_pair_list_grow PARAMS ((const char *muscle,
	80	const char a1, const char a2));
be2a1a68 AD	81
	82	void muscles_m4_output PARAMS ((FILE *out));
	83
f753cd62	84	#endif /* not MUSCLE_TAB_H_ */