public override string ToString(Context cx)
{
if (A == B)
{
if (!ObjLuaFunction.DEBUG)
{
return("");
}
return("/// " + AssignA(cx, cx.ListSR(B, C, " .. ", "")));
}
return(AssignA(cx, cx.ListSR(B, C, " .. ", "")));
}
public override string ToString(Context cx)
{
bool haslocal = false;
for (ushort i = A; i <= B; i++)
{
if (cx.IsLocal(i))
{
haslocal = true;
break;
}
}
if (!ObjLuaFunction.DEBUG && !haslocal)
{
return("");
}
string pref = "";
if (!haslocal)
{
pref = "// ";
}
return(pref + cx.ListSR(A, B, " = ") + Context.Nil.ToString());
}
public void Run(Context cx)
{
//cx.SetReg(this.A, cx.R(this.B));
for (int i = A; i <= A + C - 2; i++)
{
cx.SetReg((ushort)i, Context.Nil);
cx.SetSReg((ushort)i, cx.SR(A) + "(" + cx.ListSR(A + 1, A + B - 1, "") + ")" /*+".Result["+i+"]"*/);
}
}
public override string ToString(Context cx)
{
string content = cx.SR(A) + "(" + cx.ListSR(A + 1, A + B - 1, "") + ")";
bool haslocal = false;
for (ushort i = A; i <= A + C - 2; i++)
{
if (!cx.IsLocal(i))
{
cx.DefineLocal(i); //this fails, if this Register is used otherwise later
}
if (cx.IsLocal(i))
{
haslocal = true;
}
}
if (A <= A + C - 2)
{
if (!haslocal)
{
if (!ObjLuaFunction.DEBUG)
{
return("");
}
return("// " + ListR(A, A + C - 2, " = ", ", ... ,") + content);
}
else
{
string ret = "";
for (ushort i = A; i <= A + C - 2; i++)
{
if (i > A)
{
ret += ",";
}
if (cx.IsLocal(i))
{
ret += cx.LocalName(i);
}
else
{
ret += R(i);
}
}
return(ret + " = " + content);
}
}
return(content);
}
public override string ToString(Context cx)
{
if (tfl == null)
{
return("");
}
string str = "for ";
str += cx.ListSR(tfl.A + 2, tfl.A + 2 + tfl.C, "") + " in ";
str += cx.SR(A) + " do ";
return(str);
}
public override string ToString(Context cx)
{
return("return " + cx.ListSR(A, A + B - 2, ""));
}
