Vix VARARGS passing by adjusting stack on varargs call to bury varargs + length of varargs under base of stack
This commit is contained in:
@@ -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 );
|
||||
}
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user