object Stmt.Visitor <object> .visitFunctionStmt(Function stmt)
{
//Console.WriteLine("visitFunctionStmt");
TypeScriptNativeFunction function =
new TypeScriptNativeFunction(stmt, environment, false);
environment.define(stmt.name.lexeme, function);
return(null);
}
object TypeScriptNativeCallable.call(Interpreter interpreter, List <object> arguments)
{
TypeScriptNativeInstance instance = new TypeScriptNativeInstance(this);
TypeScriptNativeFunction initializer = findMethod("constructor");
if (initializer != null)
{
initializer.bind(instance).call(interpreter, arguments);
}
return(instance);
}
object Stmt.Visitor <object> .visitClassStmt(Class stmt)
{
//Console.WriteLine("visitClassStmt");
Object superclass = null;
if (stmt.superclass != null)
{
superclass = evaluate(stmt.superclass);
if (!(superclass is TypeScriptNativeClass))
{
throw new RuntimeError(stmt.superclass.name,
"Superclass must be a class.");
}
}
environment.define(stmt.name.lexeme, null);
if (stmt.superclass != null)
{
environment = new MyEnvironment(environment);
environment.define("super", superclass);
}
Dictionary <String, TypeScriptNativeFunction> methods =
new Dictionary <String, TypeScriptNativeFunction>();
foreach (Function method in stmt.methods)
{
TypeScriptNativeFunction function =
new TypeScriptNativeFunction(
method,
environment,
method.name.lexeme.Equals("constructor")
);
methods.Add(method.name.lexeme, function);
}
TypeScriptNativeClass klass =
new TypeScriptNativeClass(
stmt.name.lexeme,
(TypeScriptNativeClass)superclass,
methods
);
if (superclass != null)
{
environment = environment.enclosing;
}
environment.assign(stmt.name, klass);
return(null);
}
public Object get(Token name)
{
if (fields.ContainsKey(name.lexeme))
{
return(fields[name.lexeme]);
}
TypeScriptNativeFunction method = klass.findMethod(name.lexeme);
if (method != null)
{
return(method.bind(this));
}
throw new RuntimeError(name,
"Undefined property '" + name.lexeme + "'.");
}
object Expr.Visitor <object> .visitSuperExpr(Super expr)
{
//Console.WriteLine("visitSuperExpr");
// int distance = locals.get(expr);
int outDistance;
var found = locals.TryGetValue(expr, out outDistance);
int distance = found ? outDistance : 0;
TypeScriptNativeClass superclass =
(TypeScriptNativeClass)environment.getAt(distance, "super");
TypeScriptNativeInstance myObject =
(TypeScriptNativeInstance)environment.getAt(distance - 1, "this");
TypeScriptNativeFunction method =
superclass.findMethod(expr.method.lexeme);
if (method == null)
{
throw new RuntimeError(expr.method,
"Undefined property '" + expr.method.lexeme + "'.");
}
return(method.bind(myObject));
}
