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>>poskleene_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>>poskleene_2 (<<state>>);
27    return;
28}
29
30<<attributes>> void <<ns>>poskleene_2 (<<STATE>> <<state>>) { <<prelude>>
31   /*
32    * +
33    *     'a'
34    */
35
36    rde_param_i_loc_push (<<state>>);
37    rde_param_i_next_char (<<state>>, "a", 0);
38    if (rde_param_i_kleene_abort(<<state>>)) return;
39    while (1) {
40        rde_param_i_state_push_2 (<<state>>);
41        rde_param_i_next_char (<<state>>, "a", 0);
42        if (rde_param_i_kleene_close(<<state>>)) return;
43    }
44    return;
45}
46
47/*
48 */
49