Esempio n. 1
0
  void loadConstants(LPrototype f) throws IOException {
    int n = loadInt();
    LValue[] values = new LValue[n];
    for (int i = 0; i < n; i++) {
      switch (is.readByte()) {
        case Lua.LUA_TNIL:
          values[i] = LNil.NIL;
          break;
        case Lua.LUA_TBOOLEAN:
          values[i] = (0 != is.readUnsignedByte() ? LBoolean.TRUE : LBoolean.FALSE);
          break;
        case Lua.LUA_TINT:
          values[i] = LInteger.valueOf(loadInt());
          break;
        case Lua.LUA_TNUMBER:
          values[i] = loadNumber();
          break;
        case Lua.LUA_TSTRING:
          values[i] = loadString();
          break;
        default:
          throw new IllegalStateException("bad constant");
      }
    }
    f.k = values;

    n = loadInt();
    LPrototype[] protos = new LPrototype[n];
    for (int i = 0; i < n; i++) protos[i] = loadFunction(f.source);
    f.p = protos;
  }
Esempio n. 2
0
  void loadDebug(LPrototype f) throws IOException {
    f.lineinfo = loadIntArray();
    int n = loadInt();
    f.locvars = new LocVars[n];
    for (int i = 0; i < n; i++) {
      LString varname = loadString();
      int startpc = loadInt();
      int endpc = loadInt();
      f.locvars[i] = new LocVars(varname, startpc, endpc);
    }

    n = loadInt();
    f.upvalues = new LString[n];
    for (int i = 0; i < n; i++) {
      f.upvalues[i] = loadString();
    }
  }
Esempio n. 3
0
  public LPrototype loadFunction(LString p) throws IOException {
    LPrototype f = new LPrototype();
    //		this.L.push(f);
    f.source = loadString();
    if (f.source == null) f.source = p;
    f.linedefined = loadInt();
    f.lastlinedefined = loadInt();
    f.nups = is.readUnsignedByte();
    f.numparams = is.readUnsignedByte();
    f.is_vararg = is.readUnsignedByte();
    f.maxstacksize = is.readUnsignedByte();
    f.code = loadIntArray();
    loadConstants(f);
    loadDebug(f);

    // TODO: add check here, for debugging purposes, I believe
    // see ldebug.c
    //		 IF (!luaG_checkcode(f), "bad code");

    //		 this.L.pop();
    return f;
  }