Changeset 190

Timestamp:

08/13/07 14:45:59 (1 year ago)

Author:

JarrettBillingsley

Message:

--

Files:

• trunk/minid/baselib.d (modified) (3 diffs)

trunk/minid/baselib.d

@@ -410 +410 @@
-        globals["setModuleLoader"d] = new MDClosure(globals.ns, &lib.setModuleLoader,       "setModuleLoader");
-        globals["removeKey"d] =       new MDClosure(globals.ns, &lib.removeKey,             "removeKey");
+        globals["bindContext"d] =     new MDClosure(globals.ns, &lib.bindContext,           "bindContext");
-
-        MDNamespace namespace = new MDNamespace("namespace"d, globals.ns);
@@ -831 +832 @@
-        return s.call(funcReg, numParams + 2, -1);
-    }
-
+
-    int curry(MDState s, uint numParams)
-    {
@@ -839 +840 @@
-        
-        s.push(new MDClosure(upvalues[0].as!(MDClosure).environment, &curryClosure, "curryClosure", upvalues));
+        return 1;
+    }
+    
+    int bindContext(MDState s, uint numParams)
+    {
+        struct Closure
+        {
+            MDClosure func;
+            MDValue context;
+
+            int call(MDState s, uint numParams)
+            {
+                uint funcReg = s.push(func);
+                s.push(context);
+
+                for(uint i = 0; i < numParams; i++)
+                    s.push(s.getParam(i));
+
+                return s.call(funcReg, numParams + 1, -1);
+            }
+        }
+
+        auto cl = new Closure;
+        cl.func = s.getParam!(MDClosure)(0);
+        cl.context = s.getParam(1u);
+
+        s.push(new MDClosure(cl.func.environment, &cl.call, "bound function"));
-        return 1;
-    }