public override void Compile(Execution.VM.ByteCode bc)
{
List <int> endJumps = new List <int>();
int lastIfJmp = -1;
foreach (var ifblock in m_Ifs)
{
using (bc.EnterSource(ifblock.Source))
{
if (lastIfJmp != -1)
{
bc.SetNumVal(lastIfJmp, bc.GetJumpPointForNextInstruction());
}
ifblock.Exp.CompilePossibleLiteral(bc);
lastIfJmp = bc.Emit_Jump(OpCode.Jf, -1);
bc.Emit_Enter(ifblock.StackFrame);
ifblock.Block.Compile(bc);
}
using (bc.EnterSource(m_End))
bc.Emit_Leave(ifblock.StackFrame);
endJumps.Add(bc.Emit_Jump(OpCode.Jump, -1));
}
bc.SetNumVal(lastIfJmp, bc.GetJumpPointForNextInstruction());
if (m_Else != null)
{
using (bc.EnterSource(m_Else.Source))
{
bc.Emit_Enter(m_Else.StackFrame);
m_Else.Block.Compile(bc);
}
using (bc.EnterSource(m_End))
bc.Emit_Leave(m_Else.StackFrame);
}
foreach (var endjmp in endJumps)
{
bc.SetNumVal(endjmp, bc.GetJumpPointForNextInstruction());
}
}
public override void Compile(Execution.VM.ByteCode bc)
{
List <Instruction> endJumps = new List <Instruction>();
Instruction lastIfJmp = null;
foreach (var ifblock in m_Ifs)
{
using (bc.EnterSource(ifblock.Source))
{
if (lastIfJmp != null)
{
lastIfJmp.NumVal = bc.GetJumpPointForNextInstruction();
}
ifblock.Exp.Compile(bc);
lastIfJmp = bc.Emit_Jump(OpCode.Jf, -1);
bc.Emit_Enter(ifblock.StackFrame);
ifblock.Block.Compile(bc);
}
using (bc.EnterSource(m_End))
bc.Emit_Leave(ifblock.StackFrame);
endJumps.Add(bc.Emit_Jump(OpCode.Jump, -1));
}
lastIfJmp.NumVal = bc.GetJumpPointForNextInstruction();
if (m_Else != null)
{
using (bc.EnterSource(m_ElseRef))
{
bc.Emit_Enter(m_ElseStackFrame);
m_Else.Compile(bc);
}
using (bc.EnterSource(m_End))
bc.Emit_Leave(m_ElseStackFrame);
}
foreach (var endjmp in endJumps)
{
endjmp.NumVal = bc.GetJumpPointForNextInstruction();
}
}
public override void Compile(Execution.VM.ByteCode bc)
{
using (bc.EnterSource(m_Do))
bc.Emit_Enter(m_StackFrame);
m_Block.Compile(bc);
using (bc.EnterSource(m_End))
bc.Emit_Leave(m_StackFrame);
}