internal xastlist(ASTList al)
{
foreach (AST item in al.list)
{
list.Add(parser(item));
}
}
public FunctionCall(Token token, AST func, ASTList args) : base(token)
{
Func = func;
Args = args;
Func.Parent = this;
Args.Parent = this;
}
public void Visit(ASTList t, IEnvironment env)
{
if (debug)
{
System.Console.WriteLine("ASTList: " + t.GetType().ToString());
}
result = new ErrorValue("cannot eval: " + t.ToString());
return;
}
public static AST leastCommonAncestor(AST u, AST v)
{
ASTList nodes = new ASTList();
for ( ; u != null; u = u.parent)
{
nodes.Add(u);
}
for ( ; v != null; v = v.parent)
{
if (nodes.Contains(v))
{
return(v);
}
}
return(null);
}
public InitArray(Token token, ASTList items) : base(token)
{
Items = items;
Items.Parent = this;
}
// Constructors
public ArrayLiteral(Context context, ASTList elements)
{
}
