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>>notahead_3 (<<STATE>> <<state>>);
12<<attributes>> void <<ns>>sequence_6 (<<STATE>> <<state>>);
13<<attributes>> void <<ns>>sym_TEST (<<STATE>> <<state>>);
14
15/*
16 * Precomputed table of strings (symbols, error messages, etc.).
17 */
18
19static char const* <<string-table>> [3] = {
20    /*        0 = */   "t a",
21    /*        1 = */   "n TEST",
22    /*        2 = */   "TEST"
23};
24
25/*
26 * Grammar Start Expression
27 */
28
29<<attributes>> void <<ns>><<main>> (<<STATE>> <<state>>) { <<prelude>>
30    <<self>> <<ns>>sym_TEST (<<state>>);
31    return;
32}
33
34/*
35 * value Symbol 'TEST'
36 */
37
38<<attributes>> void <<ns>>sym_TEST (<<STATE>> <<state>>) { <<prelude>>
39   /*
40    * x
41    *     !
42    *         'a'
43    *     (IDENTIFIER)
44    */
45
46    if (rde_param_i_symbol_start (<<state>>, 2)) return ;
47    <<self>> <<ns>>sequence_6 (<<state>>);
48    rde_param_i_symbol_done_leaf (<<state>>, 2, 1);
49    return;
50}
51
52<<attributes>> void <<ns>>sequence_6 (<<STATE>> <<state>>) { <<prelude>>
53   /*
54    * x
55    *     !
56    *         'a'
57    *     (IDENTIFIER)
58    */
59
60    rde_param_i_state_push_void (<<state>>);
61    <<self>> <<ns>>notahead_3 (<<state>>);
62    if (rde_param_i_seq_void2void(<<state>>)) return;
63    /* Undefined symbol 'IDENTIFIER' */;
64    rde_param_i_status_fail (<<state>>);
65    rde_param_i_state_merge_void (<<state>>);
66    return;
67}
68
69<<attributes>> void <<ns>>notahead_3 (<<STATE>> <<state>>) { <<prelude>>
70   /*
71    * !
72    *     'a'
73    */
74
75    rde_param_i_loc_push (<<state>>);
76    rde_param_i_next_char (<<state>>, "a", 0);
77    rde_param_i_notahead_exit (<<state>>);
78    return;
79}
80
81/*
82 */
83