Support for iterator-style for loops, and "pairs" builting function

This commit is contained in:
James Roseborough
2007-06-10 22:53:09 +00:00
parent e1e6625aa1
commit de763e0a1e
8 changed files with 98 additions and 20 deletions

View File

@@ -6,24 +6,43 @@ package lua;
import lua.value.LFunction;
import lua.value.LString;
import lua.value.LTable;
import lua.value.LValue;
final class Builtin extends LFunction {
static void addBuiltins(LTable table) {
table.luaSetTable( new LString( "print" ), new Builtin(0) );
for ( int i=0; i<NAMES.length; i++ )
table.luaSetTable( new LString( NAMES[i] ), new Builtin(i) );
}
private static final int PRINT = 0;
private static final int PAIRS = 1;
private static final String[] NAMES = { "print", "pairs" };
private int id;
Builtin( int id ) {
private Builtin( int id ) {
this.id = id;
}
public String toString() {
return "Builtin('"+NAMES[id]+"')";
}
// perform a lua call
public void luaStackCall(StackState state, int base, int nresults) {
public void luaStackCall(StackState state, int base, int nargs) {
switch ( id ) {
case PRINT:
System.out.println( String.valueOf( state.stack[base+1] ) );
for ( int i=0; i<nargs; i++ ) {
if ( i > 0 )
System.out.print( "\t" );
System.out.print( String.valueOf(state.stack[base+1+i]) );
}
System.out.println();
return;
case PAIRS:
LValue value = state.stack[base+1].luaPairs();
state.stack[base] = value;
return;
default:
luaUnsupportedOperation();