5

经过一些重新测试后,我发现我的实现无法处理很多递归。虽然在 Firefox 中运行了一些测试后,我发现这可能比我最初想象的更常见。我相信基本问题是我的实现需要 3 次调用才能进行函数调用。第一次调用是对一个名为的方法进行的,该方法Call确保调用是对一个可调用对象并获取任何引用的参数的值。第二次调用一个名为的方法,该方法Call定义在ICallable界面。此方法创建新的执行上下文并构建 lambda 表达式(如果尚未创建)。最后调用函数对象封装的 lambda。显然,进行函数调用非常繁重,但我确信通过一些调整,我可以在使用此实现时使递归成为一个可行的工具。

public static object Call(ExecutionContext context, object value, object[] args)
{
    var func = Reference.GetValue(value) as ICallable;
    if (func == null)
    {
        throw new TypeException();
    }
    if (args != null && args.Length > 0)
    {
        for (int i = 0; i < args.Length; i++)
        {
            args[i] = Reference.GetValue(args[i]);
        }
    }
    var reference = value as Reference;
    if (reference != null)
    {
        if (reference.IsProperty)
        {
            return func.Call(reference.Value, args);
        }
        else
        {
            return func.Call(((EnviromentRecord)reference.Value).ImplicitThisValue(), args);
        }
    }
    return func.Call(Undefined.Value, args);
}

public object Call(object thisObject, object[] arguments)
{
    var lexicalEnviroment = Scope.NewDeclarativeEnviroment();
    var variableEnviroment = Scope.NewDeclarativeEnviroment();
    var thisBinding = thisObject ?? Engine.GlobalEnviroment.GlobalObject;
    var newContext = new ExecutionContext(Engine, lexicalEnviroment, variableEnviroment, thisBinding);
    Engine.EnterContext(newContext);
    var result = Function.Value(newContext, arguments);
    Engine.LeaveContext();
    return result;
}
4

1 回答 1

2

我无法相信这是多么容易开始工作。基本上在我的编译器中,我检查函数是否返回调用自身的结果。如果是这样,我将返回正在传递的参数。然后我只需获取任何参考值并重新调用支持 lambda。有了这个,我就可以进行数百万次递归调用。

我要感谢DrJokepu启发了这个解决方案。

public object Call(object thisObject, object[] arguments)
{
    var lexicalEnviroment = Scope.NewDeclarativeEnviroment();
    var variableEnviroment = Scope.NewDeclarativeEnviroment();
    var thisBinding = thisObject ?? Engine.GlobalEnviroment.GlobalObject;
    var newContext = new ExecutionContext(Engine, lexicalEnviroment, variableEnviroment, thisBinding);
    var result = default(object);
    var callArgs = default(object[]);

    Engine.EnterContext(newContext);
    while (true)
    {
        result = Function.Value(newContext, arguments);
        callArgs = result as object[];
        if (callArgs == null)
        {
            break;
        }
        for (int i = 0; i < callArgs.Length; i++)
        {
            callArgs[i] = Reference.GetValue(callArgs[i]);
        }
        arguments = callArgs;
    }
    Engine.LeaveContext();

    return result;
}
于 2010-05-24T01:27:49.010 回答