mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-21 18:23:03 +00:00
(MUSCLE_GROW_STRING_PAIR): Remove; unused.
(MUSCLE_OBSTACK_SGROW, MUSCLE_INSERT_C_STRING): New macros.
This commit is contained in:
@@ -57,9 +57,25 @@ extern struct obstack muscle_obstack;
|
|||||||
muscle_insert (Key, obstack_finish (&muscle_obstack)); \
|
muscle_insert (Key, obstack_finish (&muscle_obstack)); \
|
||||||
}
|
}
|
||||||
|
|
||||||
#define MUSCLE_GROW_STRING_PAIR(Key, Value1, Value2) \
|
#define MUSCLE_OBSTACK_SGROW(Obstack, Value) \
|
||||||
{ \
|
{ \
|
||||||
obstack_sgrow (&muscle_obstack, Value1); \
|
char const *s; \
|
||||||
|
for (s = Value; *s; s++) \
|
||||||
|
switch (*s) \
|
||||||
|
{ \
|
||||||
|
case '$': obstack_sgrow (Obstack, "$]["); break; \
|
||||||
|
case '@': obstack_sgrow (Obstack, "@@" ); break; \
|
||||||
|
case '[': obstack_sgrow (Obstack, "@{" ); break; \
|
||||||
|
case ']': obstack_sgrow (Obstack, "@}" ); break; \
|
||||||
|
default: obstack_1grow (Obstack, *s); break; \
|
||||||
|
} \
|
||||||
|
}
|
||||||
|
|
||||||
|
#define MUSCLE_INSERT_C_STRING(Key, Value) \
|
||||||
|
{ \
|
||||||
|
MUSCLE_OBSTACK_SGROW (&muscle_obstack, \
|
||||||
|
quotearg_style (c_quoting_style, \
|
||||||
|
Value)); \
|
||||||
obstack_1grow (&muscle_obstack, 0); \
|
obstack_1grow (&muscle_obstack, 0); \
|
||||||
muscle_insert (Key, obstack_finish (&muscle_obstack)); \
|
muscle_insert (Key, obstack_finish (&muscle_obstack)); \
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user