8 symbol_t* symbol_new (gboolean terminal, gint value)
11 symbol = g_malloc (sizeof (symbol_t));
12 symbol->terminal = terminal;
13 symbol->value = value;
20 rule = g_malloc (sizeof (rule_t));
25 void rule_append (rule_t* rule, symbol_t* right)
27 rule->right = g_list_append (rule->right, right);
30 guint symbol_hash (gconstpointer data)
33 symbol = (symbol_t*) data;
34 return g_direct_hash ((gpointer)symbol->value);
37 gboolean symbol_equal (gconstpointer data1, gconstpointer data2)
41 symbol1 = (symbol_t*) data1;
42 symbol2 = (symbol_t*) data2;
43 return symbol1->value == symbol2->value &&
44 symbol1->terminal == symbol2->terminal;
47 static void grammar_init (GTypeInstance* instance, gpointer g_class)
49 Grammar* self = GRAMMAR(instance);
50 self->grammar = g_hash_table_new_full (symbol_hash, symbol_equal,
54 static void grammar_finalize (GObject* obj)
57 GObject* parent_class;
60 g_hash_table_destroy (self->grammar);
61 klass = GRAMMAR_GET_CLASS(obj);
62 parent_class = g_type_class_peek_parent (klass);
63 G_OBJECT_CLASS(parent_class)->finalize (obj);
66 static void grammar_class_init (GrammarClass* klass)
68 GObjectClass* gobj_class = G_OBJECT_CLASS(klass);
69 gobj_class->finalize = grammar_finalize;
72 GType grammar_get_type ()
74 static GType type = 0;
77 static const GTypeInfo info =
79 sizeof (GrammarClass),
82 (GClassInitFunc)grammar_class_init,
89 type = g_type_register_static (G_TYPE_OBJECT, "GrammarType", &info, 0);
94 rule_t* grammar_rule_new (Grammar* grammar, symbol_t* left)
100 if (!g_hash_table_lookup_extended (grammar->grammar,
101 left, NULL, (gpointer*)&l))
103 l = g_malloc (sizeof (GList**));
104 g_hash_table_insert (grammar->grammar, left, l);
109 *l = g_list_append (*l, rule);
115 void grammar_rule_append (rule_t* rule, symbol_t* right)
117 rule_append (rule, right);