aboutsummaryrefslogtreecommitdiffstats
path: root/utils/Burg/string.c
blob: 9b69c3045ff4719369dd6dd6e676f5aa782603bb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
char rcsid_string[] = "$Id$";

#include <stdio.h>
#include <string.h>
#include "b.h"
#include "fe.h"

static StrTableElement newStrTableElement ARGS((void));

StrTable
newStrTable()
{
	return (StrTable) zalloc(sizeof(struct strTable));
}

static StrTableElement
newStrTableElement()
{
	return (StrTableElement) zalloc(sizeof(struct strTableElement));
}

void
dumpStrTable(t) StrTable t;
{ 
	List e;
	IntList r;

	printf("Begin StrTable\n");
	for (e = t->elems; e; e = e->next) {
		StrTableElement el = (StrTableElement) e->x;
		printf("%s: ", el->str);
		for (r = el->erulenos; r; r = r->next) {
			int i = r->x;
			printf("(%d)", i);
		}
		printf("\n");
	}
	printf("End StrTable\n");
}

StrTableElement
addString(t, s, eruleno, new) StrTable t; char *s; int eruleno; int *new;
{
	List l;
	StrTableElement ste;

	assert(t);
	for (l = t->elems; l; l = l->next) {
		StrTableElement e = (StrTableElement) l->x;

		assert(e);
		if (!strcmp(s, e->str)) {
			e->erulenos = newIntList(eruleno, e->erulenos);
			*new = 0;
			return e;
		}
	}
	ste = newStrTableElement();
	ste->erulenos = newIntList(eruleno, 0);
	ste->str = (char *) zalloc(strlen(s) + 1);
	strcpy(ste->str, s);
	t->elems = newList(ste, t->elems);
	*new = 1;
	return ste;
}