diff --git a/src/main/java/lua/io/Closure.java b/src/main/java/lua/io/Closure.java
index a05d37da..da650e0b 100644
--- a/src/main/java/lua/io/Closure.java
+++ b/src/main/java/lua/io/Closure.java
@@ -1,6 +1,8 @@
 package lua.io;
 
 import lua.StackState;
+import lua.value.LInteger;
+import lua.value.LNil;
 import lua.value.LValue;
 
 public class Closure extends LValue {
@@ -18,8 +20,26 @@ public class Closure extends LValue {
 
 	// perform a lua call
 	public void luaStackCall(StackState state, int base) {
-		if ( (! p.is_vararg) || (state.top < base+1+p.numparams) )
-			state.adjustTop( base+1+p.numparams );
-		state.vmExecute( this, base+1 );
+		// skip over closure
+		base++;
+		if ( p.is_vararg ) {
+			
+			// adjust stack to bury varargs under base
+			int top = state.top;
+			int nsupplied = top-base;
+			int nrequired = p.numparams;
+			int nvarargs = Math.max( 0, nsupplied - nrequired );
+			for ( int i=0; i<nrequired; i++ )
+				state.stack[top+i+1] = (i<nsupplied? state.stack[base+i]: LNil.NIL);
+			state.stack[top] = new LInteger( nvarargs );
+			state.top = top + nrequired + 1;
+			base = top+1;
+			
+		} else {
+			
+			// normal non-varargs call
+			state.adjustTop( base+p.numparams );
+		}
+		state.vmExecute( this, base );
 	}
 }
diff --git a/src/test/res/test3.lua b/src/test/res/test3.lua
index 77f19aa0..e4c6f4c9 100644
--- a/src/test/res/test3.lua
+++ b/src/test/res/test3.lua
@@ -42,14 +42,12 @@ print( func(func(32,33,34), func(45,46,47), func(58,59,50)) )
 --[[
 function p(a,...)
 	print("a",a)
-	print("a,...",a,...)
 	print("...",...)
 	print("...,a",...,a)
+	print("a,...",a,...)
 end
-local aa,bb,cc,dd
 p()
 p("q")
 p("q","r")
 p("q","r","s")
-print(aa,bb,cc,dd)
---]]
+--]]
\ No newline at end of file