private void ConfirmBindings(Notation notation, Symbol qexpr, QueryContext context)
{
if (context.bindings.Count > 0)
{
Symbol[] bindings = new Symbol[context.bindings.Count];
for (int k = 0; k < bindings.Length; k++)
{
bindings[k] = new Symbol(Tag.Binding);
if (context.bindings[k].src == null)
notation.Confirm(bindings[k], Descriptor.Link, context.bindings[k].target);
else
notation.Confirm(bindings[k], Descriptor.Link, context.bindings[k].src);
}
notation.Confirm(qexpr, Descriptor.Binding, Lisp.List(bindings));
}
}
