1/*
2 * -*- tcl -*-
3 * Parsing Expression Grammar 'TEMPLATE'.
4 * Generated for unknown, from file 'TEST'
5 */
6
7/*
8 * Declaring the parse functions
9 */
10
11<<attributes>> void <<ns>>kleene_2 (<<STATE>> <<state>>);
12
13/*
14 * Precomputed table of strings (symbols, error messages, etc.).
15 */
16
17static char const* <<string-table>> [1] = {
18    /*        0 = */   "t a"
19};
20
21/*
22 * Grammar Start Expression
23 */
24
25<<attributes>> void <<ns>><<main>> (<<STATE>> <<state>>) { <<prelude>>
26    <<self>> <<ns>>kleene_2 (<<state>>);
27    return;
28}
29
30<<attributes>> void <<ns>>kleene_2 (<<STATE>> <<state>>) { <<prelude>>
31   /*
32    * *
33    *     'a'
34    */
35
36    while (1) {
37        rde_param_i_state_push_2 (<<state>>);
38        rde_param_i_next_char (<<state>>, "a", 0);
39        if (rde_param_i_kleene_close(<<state>>)) return;
40    }
41    return;
42}
43
44/*
45 */
46