summaryrefslogtreecommitdiff
path: root/src/cli/runtime/RestFn2.cs
diff options
context:
space:
mode:
Diffstat (limited to 'src/cli/runtime/RestFn2.cs')
-rw-r--r--src/cli/runtime/RestFn2.cs59
1 files changed, 59 insertions, 0 deletions
diff --git a/src/cli/runtime/RestFn2.cs b/src/cli/runtime/RestFn2.cs
new file mode 100644
index 00000000..c0cdfe55
--- /dev/null
+++ b/src/cli/runtime/RestFn2.cs
@@ -0,0 +1,59 @@
+/**
+ * Copyright (c) Rich Hickey. All rights reserved.
+ * The use and distribution terms for this software are covered by the
+ * Common Public License 1.0 (http://opensource.org/licenses/cpl.php)
+ * which can be found in the file CPL.TXT at the root of this distribution.
+ * By using this software in any fashion, you are agreeing to be bound by
+ * the terms of this license.
+ * You must not remove this notice, or any other, from this software.
+ **/
+
+/* rich Mar 27, 2006 8:05:10 PM */
+
+using System;
+
+namespace org.clojure.runtime
+{
+
+public abstract class RestFn2 : AFn{
+
+protected abstract Object doInvoke(ThreadLocalData tld, Object arg1, Object arg2, Cons rest) /*throws Exception*/;
+
+override public Object applyTo(ThreadLocalData tld, Cons arglist) /*throws Exception*/
+ {
+ if(RT.boundedLength(arglist, 2) < 2)
+ throwArity();
+ return doInvoke(tld, arglist.first
+ , (arglist = arglist.rest).first
+ , arglist.rest);
+
+ }
+
+override public Object invoke(ThreadLocalData tld, Object arg1, Object arg2) /*throws Exception*/
+ {
+ return doInvoke(tld, arg1, arg2, null);
+ }
+
+override public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3) /*throws Exception*/
+ {
+ return doInvoke(tld, arg1, arg2, RT.list(arg3));
+ }
+
+override public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3, Object arg4) /*throws Exception*/
+ {
+ return doInvoke(tld, arg1, arg2, RT.list(arg3, arg4));
+ }
+
+override public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3, Object arg4, Object arg5)
+ /*throws Exception*/
+ {
+ return doInvoke(tld, arg1, arg2, RT.list(arg3, arg4, arg5));
+ }
+
+override public Object invoke(ThreadLocalData tld, Object arg1, Object arg2, Object arg3, Object arg4, Object arg5, Cons args)
+ /*throws Exception*/
+ {
+ return doInvoke(tld, arg1, arg2, RT.listStar(arg3, arg4, arg5, args));
+ }
+}
+}