Moving CBotInstr class in its own header and source files.

dev-time-step
Grunaka 2015-11-16 22:00:01 +01:00
parent 013be673ce
commit ef4e2f08a3
52 changed files with 735 additions and 429 deletions

View File

@ -83,342 +83,6 @@
// Global include
#include <cassert>
CBotInstr::CBotInstr()
{
name = "CBotInstr";
m_next = nullptr;
m_next2b = nullptr;
m_next3 = nullptr;
m_next3b = nullptr;
}
CBotInstr::~CBotInstr()
{
delete m_next;
delete m_next2b;
delete m_next3;
delete m_next3b;
}
// counter of nested loops,
// to determine the break and continue valid
// list of labels used
int CBotInstr::m_LoopLvl = 0;
CBotStringArray CBotInstr::m_labelLvl = CBotStringArray();
// adds a level with a label
void CBotInstr::IncLvl(CBotString& label)
{
m_labelLvl.SetSize(m_LoopLvl+1);
m_labelLvl[m_LoopLvl] = label;
m_LoopLvl++;
}
// adds a level (switch statement)
void CBotInstr::IncLvl()
{
m_labelLvl.SetSize(m_LoopLvl+1);
m_labelLvl[m_LoopLvl] = "#SWITCH";
m_LoopLvl++;
}
// free a level
void CBotInstr::DecLvl()
{
m_LoopLvl--;
m_labelLvl[m_LoopLvl].Empty();
}
// control validity of break and continue
bool CBotInstr::ChkLvl(const CBotString& label, int type)
{
int i = m_LoopLvl;
while (--i>=0)
{
if ( type == ID_CONTINUE && m_labelLvl[i] == "#SWITCH") continue;
if (label.IsEmpty()) return true;
if (m_labelLvl[i] == label) return true;
}
return false;
}
bool CBotInstr::IsOfClass(CBotString n)
{
return name == n;
}
////////////////////////////////////////////////////////////////////////////
// database management class CBotInstr
// set the token corresponding to the instruction
void CBotInstr::SetToken(CBotToken* p)
{
m_token = *p;
}
// return the type of the token assicated with the instruction
int CBotInstr::GetTokenType()
{
return m_token.GetType();
}
// return associated token
CBotToken* CBotInstr::GetToken()
{
return &m_token;
}
// adds the statement following the other
void CBotInstr::AddNext(CBotInstr* n)
{
CBotInstr* p = this;
while (p->m_next != nullptr) p = p->m_next;
p->m_next = n;
}
void CBotInstr::AddNext3(CBotInstr* n)
{
CBotInstr* p = this;
while (p->m_next3 != nullptr) p = p->m_next3;
p->m_next3 = n;
}
void CBotInstr::AddNext3b(CBotInstr* n)
{
CBotInstr* p = this;
while (p->m_next3b != nullptr) p = p->m_next3b;
p->m_next3b = n;
}
// returns next statement
CBotInstr* CBotInstr::GetNext()
{
return m_next;
}
CBotInstr* CBotInstr::GetNext3()
{
return m_next3;
}
CBotInstr* CBotInstr::GetNext3b()
{
return m_next3b;
}
///////////////////////////////////////////////////////////////////////////
// compile an instruction which can be
// while, do, try, throw, if, for, switch, break, continue, return
// int, float, boolean, string,
// declaration of an instance of a class
// arbitrary expression
CBotInstr* CBotInstr::Compile(CBotToken* &p, CBotCStack* pStack)
{
CBotToken* pp = p;
if (p == nullptr) return nullptr;
int type = p->GetType(); // what is the next token
// is it a lable?
if (IsOfType(pp, TokenTypVar) &&
IsOfType(pp, ID_DOTS))
{
type = pp->GetType();
// these instructions accept only lable
if (!IsOfTypeList(pp, ID_WHILE, ID_FOR, ID_DO, 0))
{
pStack->SetError(TX_LABEL, pp->GetStart());
return nullptr;
}
}
// call routine corresponding to the compilation token found
switch (type)
{
case ID_WHILE:
return CBotWhile::Compile(p, pStack);
case ID_FOR:
return CBotFor::Compile(p, pStack);
case ID_DO:
return CBotDo::Compile(p, pStack);
case ID_BREAK:
case ID_CONTINUE:
return CBotBreak::Compile(p, pStack);
case ID_SWITCH:
return CBotSwitch::Compile(p, pStack);
case ID_TRY:
return CBotTry::Compile(p, pStack);
case ID_THROW:
return CBotThrow::Compile(p, pStack);
case ID_INT:
return CBotInt::Compile(p, pStack);
case ID_FLOAT:
return CBotFloat::Compile(p, pStack);
case ID_STRING:
return CBotIString::Compile(p, pStack);
case ID_BOOLEAN:
case ID_BOOL:
return CBotBoolean::Compile(p, pStack);
case ID_IF:
return CBotIf::Compile(p, pStack);
case ID_RETURN:
return CBotReturn::Compile(p, pStack);
case ID_ELSE:
pStack->SetStartError(p->GetStart());
pStack->SetError(TX_ELSEWITHOUTIF, p->GetEnd());
return nullptr;
case ID_CASE:
pStack->SetStartError(p->GetStart());
pStack->SetError(TX_OUTCASE, p->GetEnd());
return nullptr;
}
pStack->SetStartError(p->GetStart());
// should not be a reserved word DefineNum
if (p->GetType() == TokenTypDef)
{
pStack->SetError(TX_RESERVED, p);
return nullptr;
}
// this might be an instance of class definnition
CBotToken* ppp = p;
if (IsOfType(ppp, TokenTypVar))
{
if (CBotClass::Find(p) != nullptr)
{
// yes, compiles the declaration of the instance
return CBotClassInst::Compile(p, pStack);
}
}
// this can be an arythmetic instruction
CBotInstr* inst = CBotExpression::Compile(p, pStack);
if (IsOfType(p, ID_SEP))
{
return inst;
}
pStack->SetError(TX_ENDOF, p->GetStart());
delete inst;
return nullptr;
}
bool CBotInstr::Execute(CBotStack* &pj)
{
CBotString ClassManquante = name;
assert(0); // should never go through this routine
// but use the routines of the subclasses
return false;
}
bool CBotInstr::Execute(CBotStack* &pj, CBotVar* pVar)
{
if (!Execute(pj)) return false;
pVar->SetVal(pj->GetVar());
return true;
}
void CBotInstr::RestoreState(CBotStack* &pj, bool bMain)
{
CBotString ClassManquante = name;
assert(0); // should never go through this routine
// but use the routines of the subclasses
}
bool CBotInstr::ExecuteVar(CBotVar* &pVar, CBotCStack* &pile)
{
assert(0); // dad do not know, see the girls
return false;
}
bool CBotInstr::ExecuteVar(CBotVar* &pVar, CBotStack* &pile, CBotToken* prevToken, bool bStep, bool bExtend)
{
assert(0); // dad do not know, see the girls
return false;
}
void CBotInstr::RestoreStateVar(CBotStack* &pile, bool bMain)
{
assert(0); // dad do not know, see the girls
}
// this routine is defined only for the subclass CBotCase
// this allows to make the call on all instructions CompCase
// to see if it's a case to the desired value.
bool CBotInstr::CompCase(CBotStack* &pj, int val)
{
return false;
}
CBotInstr* CBotInstr::CompileArray(CBotToken* &p, CBotCStack* pStack, CBotTypResult type, bool first)
{
if (IsOfType(p, ID_OPBRK))
{
if (!IsOfType(p, ID_CLBRK))
{
pStack->SetError(TX_CLBRK, p->GetStart());
return nullptr;
}
CBotInstr* inst = CompileArray(p, pStack, CBotTypResult(CBotTypArrayPointer, type), false);
if (inst != nullptr || !pStack->IsOk()) return inst;
}
// compiles an array declaration
if (first) return nullptr ;
CBotInstr* inst = CBotInstArray::Compile(p, pStack, type);
if (inst == nullptr) return nullptr;
if (IsOfType(p, ID_COMMA)) // several definitions
{
if (nullptr != ( inst->m_next2b = CBotInstArray::CompileArray(p, pStack, type, false))) // compiles next one
{
return inst;
}
delete inst;
return nullptr;
}
if (IsOfType(p, ID_SEP)) // end of instruction
{
return inst;
}
delete inst;
pStack->SetError(TX_ENDOF, p->GetStart());
return nullptr;
}
//////////////////////////////////////////////////////////////////////////////////////////
// compile a list of parameters

View File

@ -54,96 +54,6 @@ class CBotDefParam; // paramerer list of a function
extern bool SaveVar(FILE* pf, CBotVar* pVar);
/////////////////////////////////////////////////////////////////////
// class defining an instruction
class CBotInstr
{
private:
static
CBotStringArray
m_labelLvl;
protected:
CBotToken m_token; // keeps the token
CBotString name; // debug
CBotInstr* m_next; // linked command
CBotInstr* m_next2b; // second list definition chain
CBotInstr* m_next3; // third list for indices and fields
CBotInstr* m_next3b; // necessary for reporting tables
/*
for example, the following program
int x[]; x[1] = 4;
int y[x[1]][10], z;
is generated
CBotInstrArray
m_next3b-> CBotEmpty
m_next->
CBotExpression ....
m_next->
CBotInstrArray
m_next3b-> CBotExpression ('x') ( m_next3-> CBotIndexExpr ('1') )
m_next3b-> CBotExpression ('10')
m_next2-> 'z'
m_next->...
*/
static
int m_LoopLvl;
friend class CBotClassInst;
friend class CBotInt;
friend class CBotListArray;
public:
CBotInstr();
virtual
~CBotInstr();
static
CBotInstr* Compile(CBotToken* &p, CBotCStack* pStack);
static
CBotInstr* CompileArray(CBotToken* &p, CBotCStack* pStack, CBotTypResult type, bool first = true);
virtual
bool Execute(CBotStack* &pj);
virtual
bool Execute(CBotStack* &pj, CBotVar* pVar);
virtual
void RestoreState(CBotStack* &pj, bool bMain);
virtual
bool ExecuteVar(CBotVar* &pVar, CBotCStack* &pile);
virtual
bool ExecuteVar(CBotVar* &pVar, CBotStack* &pile, CBotToken* prevToken, bool bStep, bool bExtend);
virtual
void RestoreStateVar(CBotStack* &pile, bool bMain);
virtual
bool CompCase(CBotStack* &pj, int val);
void SetToken(CBotToken* p);
int GetTokenType();
CBotToken* GetToken();
void AddNext(CBotInstr* n);
CBotInstr* GetNext();
void AddNext3(CBotInstr* n);
CBotInstr* GetNext3();
void AddNext3b(CBotInstr* n);
CBotInstr* GetNext3b();
static
void IncLvl(CBotString& label);
static
void IncLvl();
static
void DecLvl();
static
bool ChkLvl(const CBotString& label, int type);
bool IsOfClass(CBotString name);
};
#define MAX(a,b) ((a>b) ? a : b)
extern CBotInstr* CompileParams(CBotToken* &p, CBotCStack* pStack, CBotVar** ppVars);

View File

@ -21,6 +21,8 @@
// Modules inlcude
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -24,6 +24,8 @@
#include "CBotDefines.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -21,8 +21,11 @@
// Modules inlcude
#include "CBot.h"
#include "CBotLeftExpr.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -0,0 +1,374 @@
/*
* This file is part of the Colobot: Gold Edition source code
* Copyright (C) 2001-2015, Daniel Roux, EPSITEC SA & TerranovaTeam
* http://epsitec.ch; http://colobot.info; http://github.com/colobot
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
* See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see http://gnu.org/licenses
*/
// Modules inlcude
#include "CBotInstr.h"
#include "CBotInstr/CBotFor.h"
#include "CBotInstr/CBotDo.h"
#include "CBotInstr/CBotBreak.h"
#include "CBotInstr/CBotSwitch.h"
#include "CBotInstr/CBotTry.h"
#include "CBotInstr/CBotThrow.h"
#include "CBotInstr/CBotInt.h"
#include "CBotInstr/CBotFloat.h"
#include "CBotInstr/CBotWhile.h"
#include "CBotInstr/CBotIString.h"
#include "CBotInstr/CBotBoolean.h"
#include "CBotInstr/CBotIf.h"
#include "CBotInstr/CBotReturn.h"
#include "CBotInstr/CBotClassInst.h"
#include "CBotInstr/CBotExpression.h"
#include "CBotInstr/CBotInstArray.h"
#include "CBotVar/CBotVar.h"
#include "CBotClass.h"
#include "CBotStack.h"
// Local include
// Global include
#include <cassert>
////////////////////////////////////////////////////////////////////////////////
int CBotInstr::m_LoopLvl = 0;
CBotStringArray CBotInstr::m_labelLvl = CBotStringArray();
////////////////////////////////////////////////////////////////////////////////
CBotInstr::CBotInstr()
{
name = "CBotInstr";
m_next = nullptr;
m_next2b = nullptr;
m_next3 = nullptr;
m_next3b = nullptr;
}
////////////////////////////////////////////////////////////////////////////////
CBotInstr::~CBotInstr()
{
delete m_next;
delete m_next2b;
delete m_next3;
delete m_next3b;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::IncLvl(CBotString& label)
{
m_labelLvl.SetSize(m_LoopLvl+1);
m_labelLvl[m_LoopLvl] = label;
m_LoopLvl++;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::IncLvl()
{
m_labelLvl.SetSize(m_LoopLvl+1);
m_labelLvl[m_LoopLvl] = "#SWITCH";
m_LoopLvl++;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::DecLvl()
{
m_LoopLvl--;
m_labelLvl[m_LoopLvl].Empty();
}
////////////////////////////////////////////////////////////////////////////////
bool CBotInstr::ChkLvl(const CBotString& label, int type)
{
int i = m_LoopLvl;
while (--i>=0)
{
if ( type == ID_CONTINUE && m_labelLvl[i] == "#SWITCH") continue;
if (label.IsEmpty()) return true;
if (m_labelLvl[i] == label) return true;
}
return false;
}
////////////////////////////////////////////////////////////////////////////////
bool CBotInstr::IsOfClass(CBotString n)
{
return name == n;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::SetToken(CBotToken* p)
{
m_token = *p;
}
////////////////////////////////////////////////////////////////////////////////
int CBotInstr::GetTokenType()
{
return m_token.GetType();
}
////////////////////////////////////////////////////////////////////////////////
CBotToken* CBotInstr::GetToken()
{
return &m_token;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::AddNext(CBotInstr* n)
{
CBotInstr* p = this;
while (p->m_next != nullptr) p = p->m_next;
p->m_next = n;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::AddNext3(CBotInstr* n)
{
CBotInstr* p = this;
while (p->m_next3 != nullptr) p = p->m_next3;
p->m_next3 = n;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::AddNext3b(CBotInstr* n)
{
CBotInstr* p = this;
while (p->m_next3b != nullptr) p = p->m_next3b;
p->m_next3b = n;
}
////////////////////////////////////////////////////////////////////////////////
CBotInstr* CBotInstr::GetNext()
{
return m_next;
}
////////////////////////////////////////////////////////////////////////////////
CBotInstr* CBotInstr::GetNext3()
{
return m_next3;
}
////////////////////////////////////////////////////////////////////////////////
CBotInstr* CBotInstr::GetNext3b()
{
return m_next3b;
}
////////////////////////////////////////////////////////////////////////////////
CBotInstr* CBotInstr::Compile(CBotToken* &p, CBotCStack* pStack)
{
CBotToken* pp = p;
if (p == nullptr) return nullptr;
int type = p->GetType(); // what is the next token
// is it a lable?
if (IsOfType(pp, TokenTypVar) &&
IsOfType(pp, ID_DOTS))
{
type = pp->GetType();
// these instructions accept only lable
if (!IsOfTypeList(pp, ID_WHILE, ID_FOR, ID_DO, 0))
{
pStack->SetError(TX_LABEL, pp->GetStart());
return nullptr;
}
}
// call routine corresponding to the compilation token found
switch (type)
{
case ID_WHILE:
return CBotWhile::Compile(p, pStack);
case ID_FOR:
return CBotFor::Compile(p, pStack);
case ID_DO:
return CBotDo::Compile(p, pStack);
case ID_BREAK:
case ID_CONTINUE:
return CBotBreak::Compile(p, pStack);
case ID_SWITCH:
return CBotSwitch::Compile(p, pStack);
case ID_TRY:
return CBotTry::Compile(p, pStack);
case ID_THROW:
return CBotThrow::Compile(p, pStack);
case ID_INT:
return CBotInt::Compile(p, pStack);
case ID_FLOAT:
return CBotFloat::Compile(p, pStack);
case ID_STRING:
return CBotIString::Compile(p, pStack);
case ID_BOOLEAN:
case ID_BOOL:
return CBotBoolean::Compile(p, pStack);
case ID_IF:
return CBotIf::Compile(p, pStack);
case ID_RETURN:
return CBotReturn::Compile(p, pStack);
case ID_ELSE:
pStack->SetStartError(p->GetStart());
pStack->SetError(TX_ELSEWITHOUTIF, p->GetEnd());
return nullptr;
case ID_CASE:
pStack->SetStartError(p->GetStart());
pStack->SetError(TX_OUTCASE, p->GetEnd());
return nullptr;
}
pStack->SetStartError(p->GetStart());
// should not be a reserved word DefineNum
if (p->GetType() == TokenTypDef)
{
pStack->SetError(TX_RESERVED, p);
return nullptr;
}
// this might be an instance of class definnition
CBotToken* ppp = p;
if (IsOfType(ppp, TokenTypVar))
{
if (CBotClass::Find(p) != nullptr)
{
// yes, compiles the declaration of the instance
return CBotClassInst::Compile(p, pStack);
}
}
// this can be an arythmetic instruction
CBotInstr* inst = CBotExpression::Compile(p, pStack);
if (IsOfType(p, ID_SEP))
{
return inst;
}
pStack->SetError(TX_ENDOF, p->GetStart());
delete inst;
return nullptr;
}
////////////////////////////////////////////////////////////////////////////////
bool CBotInstr::Execute(CBotStack* &pj)
{
CBotString ClassManquante = name;
assert(0); // should never go through this routine
// but use the routines of the subclasses
return false;
}
////////////////////////////////////////////////////////////////////////////////
bool CBotInstr::Execute(CBotStack* &pj, CBotVar* pVar)
{
if (!Execute(pj)) return false;
pVar->SetVal(pj->GetVar());
return true;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::RestoreState(CBotStack* &pj, bool bMain)
{
CBotString ClassManquante = name;
assert(0); // should never go through this routine
// but use the routines of the subclasses
}
////////////////////////////////////////////////////////////////////////////////
bool CBotInstr::ExecuteVar(CBotVar* &pVar, CBotCStack* &pile)
{
assert(0); // dad do not know, see the girls
return false;
}
////////////////////////////////////////////////////////////////////////////////
bool CBotInstr::ExecuteVar(CBotVar* &pVar, CBotStack* &pile, CBotToken* prevToken, bool bStep, bool bExtend)
{
assert(0); // dad do not know, see the girls
return false;
}
////////////////////////////////////////////////////////////////////////////////
void CBotInstr::RestoreStateVar(CBotStack* &pile, bool bMain)
{
assert(0); // dad do not know, see the girls
}
////////////////////////////////////////////////////////////////////////////////
bool CBotInstr::CompCase(CBotStack* &pj, int val)
{
return false;
}
////////////////////////////////////////////////////////////////////////////////
CBotInstr* CBotInstr::CompileArray(CBotToken* &p, CBotCStack* pStack, CBotTypResult type, bool first)
{
if (IsOfType(p, ID_OPBRK))
{
if (!IsOfType(p, ID_CLBRK))
{
pStack->SetError(TX_CLBRK, p->GetStart());
return nullptr;
}
CBotInstr* inst = CompileArray(p, pStack, CBotTypResult(CBotTypArrayPointer, type), false);
if (inst != nullptr || !pStack->IsOk()) return inst;
}
// compiles an array declaration
if (first) return nullptr ;
CBotInstr* inst = CBotInstArray::Compile(p, pStack, type);
if (inst == nullptr) return nullptr;
if (IsOfType(p, ID_COMMA)) // several definitions
{
if (nullptr != ( inst->m_next2b = CBotInstArray::CompileArray(p, pStack, type, false))) // compiles next one
{
return inst;
}
delete inst;
return nullptr;
}
if (IsOfType(p, ID_SEP)) // end of instruction
{
return inst;
}
delete inst;
pStack->SetError(TX_ENDOF, p->GetStart());
return nullptr;
}

View File

@ -0,0 +1,266 @@
/*
* This file is part of the Colobot: Gold Edition source code
* Copyright (C) 2001-2015, Daniel Roux, EPSITEC SA & TerranovaTeam
* http://epsitec.ch; http://colobot.info; http://github.com/colobot
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
* See the GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see http://gnu.org/licenses
*/
#pragma once
// Modules inlcude
#include "CBotToken.h"
#include "CBotCStack.h"
// Local include
// Global include
/*
for example, the following program
int x[]; x[1] = 4;
int y[x[1]][10], z;
is generated
CBotInstrArray
m_next3b-> CBotEmpty
m_next->
CBotExpression ....
m_next->
CBotInstrArray
m_next3b-> CBotExpression ('x') ( m_next3-> CBotIndexExpr ('1') )
m_next3b-> CBotExpression ('10')
m_next2-> 'z'
m_next->...
*/
/*!
* \brief The CBotInstr class Class defining an instruction.
*/
class CBotInstr
{
public:
/*!
* \brief CBotInstr
*/
CBotInstr();
/*!
* \brief ~CBotInstr
*/
virtual ~CBotInstr();
/*!
* \brief Compile Compile an instruction which can be while, do, try,
* throw, if, for, switch, break, continue, return, int, float, boolean,
* string, declaration of an instance of a class, arbitrary expression.
* \param p
* \param pStack
* \return
*/
static CBotInstr* Compile(CBotToken* &p,
CBotCStack* pStack);
/*!
* \brief CompileArray
* \param p
* \param pStack
* \param type
* \param first
* \return
*/
static CBotInstr* CompileArray(CBotToken* &p,
CBotCStack* pStack,
CBotTypResult type,
bool first = true);
/*!
* \brief Execute
* \param pj
* \return
*/
virtual bool Execute(CBotStack* &pj);
/*!
* \brief Execute
* \param pj
* \param pVar
* \return
*/
virtual bool Execute(CBotStack* &pj,
CBotVar* pVar);
/*!
* \brief RestoreState
* \param pj
* \param bMain
*/
virtual void RestoreState(CBotStack* &pj,
bool bMain);
/*!
* \brief ExecuteVar
* \param pVar
* \param pile
* \return
*/
virtual bool ExecuteVar(CBotVar* &pVar,
CBotCStack* &pile);
/*!
* \brief ExecuteVar
* \param pVar
* \param pile
* \param prevToken
* \param bStep
* \param bExtend
* \return
*/
virtual bool ExecuteVar(CBotVar* &pVar,
CBotStack* &pile,
CBotToken* prevToken,
bool bStep,
bool bExtend);
/*!
* \brief RestoreStateVar
* \param pile
* \param bMain
*/
virtual void RestoreStateVar(CBotStack* &pile,
bool bMain);
/*!
* \brief CompCase This routine is defined only for the subclass CBotCase
* this allows to make the call on all instructions CompCase to see if it's
* a case to the desired value..
* \param pj
* \param val
* \return
*/
virtual bool CompCase(CBotStack* &pj,
int val);
/*!
* \brief SetToken Set the token corresponding to the instruction.
* \param p
*/
void SetToken(CBotToken* p);
/*!
* \brief GetTokenType Return the type of the token assicated with the
* instruction.
* \return
*/
int GetTokenType();
/*!
* \brief GetToken Return associated token.
* \return
*/
CBotToken* GetToken();
/*!
* \brief AddNext Adds the statement following the other.
* \param n
*/
void AddNext(CBotInstr* n);
/*!
* \brief GetNext Returns next statement.
* \return
*/
CBotInstr* GetNext();
/*!
* \brief AddNext3
* \param n
*/
void AddNext3(CBotInstr* n);
/*!
* \brief GetNext3
* \return
*/
CBotInstr* GetNext3();
/*!
* \brief AddNext3b
* \param n
*/
void AddNext3b(CBotInstr* n);
/*!
* \brief GetNext3b
* \return
*/
CBotInstr* GetNext3b();
/*!
* \brief IncLvl Adds a level with a label.
* \param label
*/
static void IncLvl(CBotString& label);
/*!
* \brief IncLvl Adds a level (switch statement).
*/
static void IncLvl();
/*!
* \brief DecLvl Free a level.
*/
static void DecLvl();
/*!
* \brief ChkLvl Control validity of break and continue.
* \param label
* \param type
* \return
*/
static bool ChkLvl(const CBotString& label, int type);
/*!
* \brief IsOfClass
* \param name
* \return
*/
bool IsOfClass(CBotString name);
protected:
//! Keeps the token.
CBotToken m_token;
//! Debug.
CBotString name;
//! Linked command.
CBotInstr* m_next;
//! Second list definition chain.
CBotInstr* m_next2b;
//! Third list for indices and fields.
CBotInstr* m_next3;
//! Necessary for reporting tables.
CBotInstr* m_next3b;
//! Counter of nested loops, to determine the break and continue valid.
static int m_LoopLvl;
friend class CBotClassInst;
friend class CBotInt;
friend class CBotListArray;
private:
//! List of labels used.
static CBotStringArray m_labelLvl;
};

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,7 +22,7 @@
// Modules inlcude
#include "CBot.h"
#include "CBotStack.h"
#include "CBotInstr.h"
// Local include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -21,6 +21,8 @@
#include "CBot.h"
#include "CBotCatch.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -22,6 +22,8 @@
// Modules inlcude
#include "CBot.h"
#include "CBotInstr.h"
// Local include
// Global include

View File

@ -21,11 +21,11 @@
#include "CBotVarClass.h"
#include "CBotClass.h"
#include "CBotStack.h"
#include "CBotDefines.h"
#include "CBotInstr/CBotInstr.h"
// Local include
// Global include

View File

@ -10,6 +10,7 @@ set(SOURCES
CBotUtils.cpp
CBotDefParam.cpp
CBotCallMethode.cpp
CBotInstr/CBotInstr.cpp
CBotInstr/CBotWhile.cpp
CBotInstr/CBotDo.cpp
CBotInstr/CBotFor.cpp