Josh Holtrop
5fc712c6ee
Store tree nodes in congruent, compact arena array. Define handle types to refer to tree nodes rather than pointers to structure instances. Free tree with context.
40 lines
1.1 KiB
D
40 lines
1.1 KiB
D
import testparser;
|
|
import std.stdio;
|
|
import testutils;
|
|
|
|
int main()
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
unittest
|
|
{
|
|
string input = "ab";
|
|
p_context_t * context = p_context_new(input);
|
|
assert_eq(P_SUCCESS, p_parse(context));
|
|
|
|
/* The parser user code recorded values accessed via $$, $1, and $2 while
|
|
* the tree node for the Start rule was being formed. */
|
|
assert_eq(3, context.start_n_fields);
|
|
assert_eq(11, context.start_a_value);
|
|
assert_eq(11, context.a_value);
|
|
assert_eq(22, context.b_value);
|
|
assert_eq(TOKEN_b, context.b_token);
|
|
|
|
/* The empty-matched rule C has a null $$ tree node, and its field in the
|
|
* Start node is null as well. */
|
|
assert_eq(1, context.c_is_null);
|
|
assert_eq(1, context.c_field_is_null);
|
|
|
|
/* Field aliases reference the same component tree nodes as the positional
|
|
* references. */
|
|
assert_eq(11, context.alias_a_value);
|
|
assert_eq(22, context.alias_b_value);
|
|
|
|
Start start = p_result(context);
|
|
assert(start.pA.valid);
|
|
assert(start.pB.valid);
|
|
assert(!start.pC.valid);
|
|
p_context_delete(context);
|
|
}
|