public void AddNode(object node)
{
object value = node;
while (lists.Peek().Item2.Count > 0)
{
switch (lists.Peek().Item2.Pop())
{
case QuoteType.Quote:
value = new QuoteNode(value);
break;
case QuoteType.Backquote:
value = new BackquoteNode(value);
break;
case QuoteType.Unquote:
value = new UnquoteNode(value);
break;
case QuoteType.Splice:
value = new SpliceNode(value);
break;
}
}
lists.Peek().Item1.Add(value);
}
private void PrettyPrintSub(QuoteNode node)
{
stringWriter.Write("'");
PrettyPrint(node.InnerValue);
}
public object Evaluate(QuoteNode node, Environment environment)
{
return node.InnerValue;
}
