- let kind = Bytes.make (s+2) '\000' in
- mk_node table data kind tags ~-2 Tree.NodeKind.Element dummy_tag "" dummy dummy dummy;
- mk_node table data kind tags ~-1 Tree.NodeKind.Element QName.nil "" nil nil nil;
+ let summaries = Bytes.make (s+2) '\000' in
+ mk_node table data summaries tags ~-2 Tree.NodeSummary.dummy dummy_tag "" dummy dummy dummy;
+ mk_node table data summaries tags ~-1 Tree.NodeSummary.dummy QName.nil "" nil nil nil;