]> git.saurik.com Git - bison.git/blame_incremental - src/muscle_tab.c
* src/reduce.c (print_results): Rename as...
[bison.git] / src / muscle_tab.c
... / ...
CommitLineData
1/* Macro table manager for Bison,
2 Copyright 1984, 1989, 2000 Free Software Foundation, Inc.
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#include <string.h>
22
23#include "xalloc.h"
24#include "system.h"
25#include "hash.h"
26#include "files.h"
27#include "muscle_tab.h"
28#include "getargs.h"
29
30struct hash_table muscle_table;
31
32static unsigned long
33mhash1 (const void *item)
34{
35 return_STRING_HASH_1 (((muscle_entry_t *) item)->key);
36}
37
38static unsigned long
39mhash2 (const void *item)
40{
41 return_STRING_HASH_2 (((muscle_entry_t *) item)->key);
42}
43
44static int
45mcmp (const void *x, const void *y)
46{
47 return strcmp (((muscle_entry_t*) x)->key, ((muscle_entry_t *) y)->key);
48}
49
50void
51muscle_init (void)
52{
53 hash_init (&muscle_table, MTABSIZE, &mhash1, &mhash2, &mcmp);
54
55 /* Version and input file. */
56 muscle_insert ("version", VERSION);
57 muscle_insert ("filename", infile);
58
59 /* Skeleton use. */
60 muscle_insert ("skeleton", skeleton);
61
62 /* Types. */
63 muscle_insert ("stype", "int");
64 muscle_insert ("ltype", "yyltype");
65
66 /* Tokens. */
67 muscle_insert ("tokendef", "");
68
69 /* Tables. */
70 muscle_insert ("rhs", "0");
71 muscle_insert ("pact", "0");
72 muscle_insert ("prhs", "0");
73 muscle_insert ("stos", "0");
74 muscle_insert ("check", "0");
75 muscle_insert ("pgoto", "0");
76 muscle_insert ("table", "0");
77 muscle_insert ("tname", "0");
78 muscle_insert ("defact", "0");
79 muscle_insert ("toknum", "0");
80 muscle_insert ("defgoto", "0");
81 muscle_insert ("translate", "0");
82
83 /* Various macros. */
84 muscle_insert ("flag", "0");
85 muscle_insert ("last", "0");
86 muscle_insert ("pure", "0");
87 muscle_insert ("nsym", "0");
88 muscle_insert ("debug", "0");
89 muscle_insert ("final", "0");
90 muscle_insert ("maxtok", "0");
91 muscle_insert ("ntbase", "0");
92 muscle_insert ("verbose", "0");
93 muscle_insert ("prefix", "yy");
94 /* Default #line formatting. */
95 muscle_insert ("linef", "#line %d %s\n");
96
97 /* No parser macros. */
98 muscle_insert ("nnts", "0");
99 muscle_insert ("nrules", "0");
100 muscle_insert ("nstates", "0");
101 muscle_insert ("ntokens", "0");
102
103 /* Stack parameters. */
104 muscle_insert ("maxdepth", "10000");
105 muscle_insert ("initdepth", "200");
106
107 /* C++ macros. */
108 muscle_insert ("name", "Parser");
109}
110
111void
112muscle_insert (const char *key, const char *value)
113{
114 muscle_entry_t *pair = XMALLOC (muscle_entry_t, 1);
115 pair->key = key;
116 pair->value = value;
117 hash_insert (&muscle_table, pair);
118}
119
120const char*
121muscle_find (const char *key)
122{
123 muscle_entry_t pair = { key, 0 };
124 muscle_entry_t *result = hash_find_item (&muscle_table, &pair);
125 return result ? result->value : 0;
126}