Java LuaInteger类代码示例

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
void fornum(LuaString varname, int line) {
	/* fornum -> NAME = exp1,exp1[,exp1] forbody */
	FuncState fs = this.fs;
	int base = fs.freereg;
	this.new_localvarliteral(RESERVED_LOCAL_VAR_FOR_INDEX);
	this.new_localvarliteral(RESERVED_LOCAL_VAR_FOR_LIMIT);
	this.new_localvarliteral(RESERVED_LOCAL_VAR_FOR_STEP);
	this.new_localvar(varname);
	this.checknext('=');
	this.exp1(); /* initial value */
	this.checknext(',');
	this.exp1(); /* limit */
	if (this.testnext(','))
		this.exp1(); /* optional step */
	else { /* default step = 1 */
		fs.codeABx(Lua.OP_LOADK, fs.freereg, fs.numberK(LuaInteger.valueOf(1)));
		fs.reserveregs(1);
	}
	this.forbody(base, line, 1, true);
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
void fornum(LuaString varname, int line)
{
	/* fornum -> NAME = exp1,exp1[,exp1] forbody */
	FuncState fs = _fs;
	int base = fs.freereg;
	new_localvarliteral(RESERVED_LOCAL_VAR_FOR_INDEX, 0);
	new_localvarliteral(RESERVED_LOCAL_VAR_FOR_LIMIT, 1);
	new_localvarliteral(RESERVED_LOCAL_VAR_FOR_STEP, 2);
	new_localvar(varname, 3);
	checknext('=');
	exp1(); /* initial value */
	checknext(',');
	exp1(); /* limit */
	if(testnext(','))
		exp1(); /* optional step */
	else
	{ /* default step = 1 */
		fs.codeABx(Lua.OP_LOADK, fs.freereg, fs.numberK(LuaInteger.valueOf(1)));
		fs.reserveregs(1);
	}
	forbody(base, line, 1, true);
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
public void runThreads() throws AerospikeException {		
	lua = LuaCache.getInstance();
	
	// Start thread queries to each node.
	startThreads();		

	try {
		lua.load(statement.getPackageName(), false);
		
		LuaValue[] args = new LuaValue[4 + statement.getFunctionArgs().length];
		args[0] = lua.getFunction(statement.getFunctionName());
		args[1] = LuaInteger.valueOf(2);
		args[2] = new LuaInputStream(inputQueue);
		args[3] = new LuaOutputStream(resultSet);
		int count = 4;
		
		for (Value value : statement.getFunctionArgs()) {
			args[count++] = value.getLuaValue(lua);
		}
		lua.call("apply_stream", args);
	}
	finally {			
		LuaCache.putInstance(lua);
	}
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
@Override
public LuaValue call(LuaValue arg1, LuaValue arg2) {
	byte[] bytes = ((LuaBytes)arg1).bytes;
	int offset = arg2.toint() - 1;
	
	switch (opcode) {
	case 0: // get_int16
		return LuaInteger.valueOf(Buffer.bytesToShort(bytes, offset));
		
	case 1: // get_int32
		return LuaInteger.valueOf(Buffer.bytesToInt(bytes, offset));

	case 2: // get_int64
		return LuaInteger.valueOf(Buffer.bytesToLong(bytes, offset));
	}
	return NIL;
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
public void testIntArrayScoringTables() {
	int a = 5;
	LuaValue la = LuaInteger.valueOf(a);
	LuaTable tb = new LuaTable();
	tb.set( 1, la );
	LuaTable tc = new LuaTable();
	tc.set( 1, tb );
	
	int saa = CoerceLuaToJava.getCoercion(int.class).score(la);
	int sab = CoerceLuaToJava.getCoercion(int[].class).score(la);
	int sac = CoerceLuaToJava.getCoercion(int[][].class).score(la);
	assertTrue( saa < sab );
	assertTrue( saa < sac );
	int sba = CoerceLuaToJava.getCoercion(int.class).score(tb);
	int sbb = CoerceLuaToJava.getCoercion(int[].class).score(tb);
	int sbc = CoerceLuaToJava.getCoercion(int[][].class).score(tb);
	assertTrue( sbb < sba );
	assertTrue( sbb < sbc );
	int sca = CoerceLuaToJava.getCoercion(int.class).score(tc);
	int scb = CoerceLuaToJava.getCoercion(int[].class).score(tc);
	int scc = CoerceLuaToJava.getCoercion(int[][].class).score(tc);
	assertTrue( scc < sca );
	assertTrue( scc < scb );
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
@Override
public final LuaValue call(LuaValue text, LuaValue x, LuaValue y, LuaValue color) {
    if (!text.isstring() || !x.isnumber() || !y.isnumber() || !color.isnumber())
        return NIL;

    return LuaInteger.valueOf(mc.fontRenderer.drawString(text.tojstring(), x.tofloat(), y.tofloat(), color.toint(), false));
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
int numberK(LuaValue r) {
	if ( r instanceof LuaDouble ) {
		double d = r.todouble();
		int i = (int) d;
		if ( d == (double) i ) 
			r = LuaInteger.valueOf(i);
	}
	return this.addk(r);
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
LResponse() {
    super();
    set("header", new ZeroArgFunction() {
        @Override
        public LuaValue call() {
            if (mHeader == null) {
                return LuaValue.NIL;
            }
            return LuaString.valueOf(mHeader);
        }
    });

    set("body", new ZeroArgFunction() {
        @Override
        public LuaValue call() {
            if (mBody == null) {
                return LuaValue.NIL;
            }
            return LuaString.valueOf(mBody);
        }
    });

    set("status", new ZeroArgFunction() {
        @Override
        public LuaValue call() {
            return LuaInteger.valueOf(mStatusCode);
        }
    });
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
/**
 * Put LuaValue to map
 */
public void put(String key, LuaValue value) {
    if (value instanceof LuaDouble) {
        put(key, value.todouble());
    } else if (value instanceof LuaInteger) {
        put(key, value.toint());
    } else if (value instanceof LuaString) {
        put(key, value.tojstring());
    } else if (value instanceof LuaBoolean) {
        put(key, value.toboolean());
    }
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
@Override
public LuaValue rawget(LuaValue luaValue) {
    if(luaValue.isint())
        return Util.toLuaValue(arrayObject.get(luaValue.checkint()));

    if(luaValue.checkjstring().equals("length"))
        return LuaInteger.valueOf(arrayObject.size());

    return super.rawget(luaValue);
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
int numberK(LuaValue r)
{
	if(r instanceof LuaDouble)
	{
		double d = r.todouble();
		int i = (int)d;
		if(d == i)
		    r = LuaInteger.valueOf(i);
	}
	return addk(r);
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
public LuaValue getLuaValue(Object obj) {
	if (obj == null) {
		return LuaValue.NIL;
	}
	
	if (obj instanceof LuaValue) {
		return (LuaValue) obj;
	}

	if (obj instanceof Value) {
		Value value = (Value) obj;
		return value.getLuaValue(this);
	}

	if (obj instanceof byte[]) {
		return new LuaBytes(this, (byte[]) obj);
	}
	
	if (obj instanceof String) {
		return LuaString.valueOf((String) obj);
	}
	
	if (obj instanceof Integer) {
		return LuaInteger.valueOf((Integer) obj);
	}
	
	if (obj instanceof Long) {
		return LuaInteger.valueOf((Long) obj);
	}

	if (obj instanceof List<?>) {
		return getLuaList((List<?>) obj);
	}
	
	if (obj instanceof Map<?,?>) {
		return getLuaMap((Map<?,?>) obj);
	}
	
	return LuaValue.NIL;
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
public void testLuaIntToJavaInt() {
	LuaInteger i = LuaInteger.valueOf(777);
	Object o = CoerceLuaToJava.coerce(i, int.class);
	assertEquals( Integer.class, o.getClass() );
	assertEquals( 777, ((Number)o).intValue() );
	o = CoerceLuaToJava.coerce(i, Integer.class);
	assertEquals( Integer.class, o.getClass() );
	assertEquals( new Integer(777), o );
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
public void testLuaTableToJavaIntArray() {
	LuaTable t = new LuaTable();
	t.set(1, LuaInteger.valueOf(222) );
	t.set(2, LuaInteger.valueOf(333) );
	int[] i = null;
	Object o = CoerceLuaToJava.coerce(t, int[].class);
	assertEquals( int[].class, o.getClass() );
	i = (int[]) o;
	assertEquals( 2, i.length );
	assertEquals( 222, i[0] );
	assertEquals( 333, i[1] );
}
 

import org.luaj.vm2.LuaInteger; //导入依赖的package包/类
public LuaValue coerce( Object javaValue ) {
	Number n = (Number) javaValue;
	return LuaInteger.valueOf( n.intValue() );
}