[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 (void);
void muscle_insert (const char *key, char *value);
char *muscle_find (const char *key);
void muscle_free (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 (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 (const char *muscle,
			    const char *a1, const char *a2);

void muscles_m4_output (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;
f753cd62 MA	29
d33cb3ae PE	30	void muscle_init (void);
	31	void muscle_insert (const char key, char value);
	32	char muscle_find (const char key);
	33	void muscle_free (void);
592e8d4d AD	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
d33cb3ae	71	void muscle_grow (const char key, const char value, const char *separator);
ae7453f2 AD	72
	73	/* MUSCLE is an M4 list of pairs. Create or extend it with the pair
	74	(A1, A2). Note that because the muscle values are output double
	75	quoted, one needs to strip the first level of quotes to reach the
	76	list itself. */
	77
d33cb3ae PE	78	void muscle_pair_list_grow (const char *muscle,
d33cb3ae PE	79	const char a1, const char a2);
be2a1a68	80
d33cb3ae	81	void muscles_m4_output (FILE *out);
be2a1a68	82
f753cd62	83	#endif /* not MUSCLE_TAB_H_ */