Add unit tests for varargs

src/core/org/luaj/vm2/LuaClosure.java

@@ -170,10 +170,10 @@ public class LuaClosure extends LuaFunction {
 	}
 
 	public final Varargs invoke(Varargs varargs) {
-		return onInvoke( varargs ).eval();
+		return onInvoke(varargs).eval();
 	}
 	
-	public Varargs onInvoke(Varargs varargs) {
+	public final Varargs onInvoke(Varargs varargs) {
 		LuaValue[] stack = new LuaValue[p.maxstacksize];
 		for ( int i=0; i<p.numparams; i++ )
 			stack[i] = varargs.arg(i+1);		

src/core/org/luaj/vm2/LuaValue.java

@@ -3506,7 +3506,7 @@ public class LuaValue extends Varargs {
 	 * <p>
 	 * This may return a {@link TailcallVarargs} to be evaluated by the client. 
 	 * <p>
-	 * This should not be called directly, instead use on of the call invocation functions.
+	 * This should not be called directly, instead use one of the call invocation functions.
 	 * 
 	 * @param args the arguments to the call invocation.
 	 * @return Varargs the return values, possible a TailcallVarargs.

src/core/org/luaj/vm2/Varargs.java

@@ -623,12 +623,8 @@ public abstract class Varargs {
 			if (start == 1)
 				return this;
 			if (start > v.length)
-				return LuaValue.NONE;
-			if (start == v.length)
-				return v[v.length - 1];
-			if (start == v.length - 1)
-				return new PairVarargs(v[v.length - 2], v[v.length - 1]);
-			return new ArrayPartVarargs(v, start - 1, v.length - (start - 1));
+				return r.subargs(start - v.length);
+			return LuaValue.varargsOf(v, start - 1, v.length - (start - 1), r);
 		}
 	}
 
@@ -686,12 +682,8 @@ public abstract class Varargs {
 			if (start == 1)
 				return this;
 			if (start > length)
-				return LuaValue.NONE;
-			if (start == length)
-				return v[offset + length - 1];
-			if (start == length - 1)
-				return new PairVarargs(v[offset + length - 2], v[offset + length - 1]);
-			return new ArrayPartVarargs(v, offset + start - 1, length - (start - 1));
+				return more.subargs(start - length);
+			return LuaValue.varargsOf(v, offset + start - 1, length - (start - 1), more);
 		}
 	}
 }