Changes to get traditional functions with args. working

1999-06-15 00:57:05 +00:00
parent 02e79abac6
commit 2dfe23679d
10 changed files with 111 additions and 23 deletions
@@ -1,19 +1,35 @@
+
+import java.util.Vector;
+
 class NativeFunction extends JSObject {
    
    NativeFunction(ControlNode aBody)
    {
-        super("Function", null);
+        super("Function");
        body = aBody;
    }
    
    JSValue call(Environment theEnv, JSValue rV)
    {
+        
+        JSScope args = new JSScope("Arguments");
+        theEnv.enterNewScope(args);
+        
+        for (int i = 0; i < parameters.size(); i++) {
+            if (rV instanceof JSValueList)
+                args.putProp(theEnv, (JSString)(parameters.elementAt(i)), (JSValue) ( ((JSValueList)rV).contents.elementAt(i)) );
+            else
+                args.putProp(theEnv, (JSString)(parameters.elementAt(i)), rV );
+        }
+        
        ControlNode c = body;
        while (c != null) c = c.eval(theEnv);
        
+        theEnv.leaveScope();
        return theEnv.resultValue;
    }
    
    ControlNode body;
+    Vector parameters = new Vector();
    
 }