99 lines
3.7 KiB
C++
99 lines
3.7 KiB
C++
/**
|
|
* @author Alberto DEMICHELIS
|
|
* @author Edouard DUPIN
|
|
* @copyright 2018, Edouard DUPIN, all right reserved
|
|
* @copyright 2003-2017, Alberto DEMICHELIS, all right reserved
|
|
* @license MPL-2 (see license file)
|
|
*/
|
|
#pragma once
|
|
|
|
#include <etk/Vector.hpp>
|
|
#include <rabbit/LocalVarInfo.hpp>
|
|
#include <rabbit/OuterVar.hpp>
|
|
#include <rabbit/LineInfo.hpp>
|
|
#include <rabbit/Instruction.hpp>
|
|
|
|
namespace rabbit {
|
|
class FuncState {
|
|
public:
|
|
FuncState(rabbit::SharedState *ss,rabbit::FuncState *parent,compilererrorFunc efunc,void *ed);
|
|
~FuncState();
|
|
#ifdef _DEBUG_DUMP
|
|
void dump(rabbit::FunctionProto *func);
|
|
#endif
|
|
void error(const char *err);
|
|
FuncState *pushChildState(rabbit::SharedState *ss);
|
|
void popChildState();
|
|
void addInstruction(SQOpcode _op,int64_t arg0=0,int64_t arg1=0,int64_t arg2=0,int64_t arg3=0);
|
|
void addInstruction(rabbit::Instruction &i);
|
|
void setIntructionParams(int64_t pos,int64_t arg0,int64_t arg1,int64_t arg2=0,int64_t arg3=0);
|
|
void setIntructionParam(int64_t pos,int64_t arg,int64_t val);
|
|
rabbit::Instruction &getInstruction(int64_t pos){return _instructions[pos];}
|
|
void popInstructions(int64_t size){for(int64_t i=0;i<size;i++)_instructions.popBack();}
|
|
void setStacksize(int64_t n);
|
|
int64_t CountOuters(int64_t stacksize);
|
|
void snoozeOpt(){_optimization=false;}
|
|
void addDefaultParam(int64_t trg) { _defaultparams.pushBack(trg); }
|
|
int64_t getDefaultParamCount() { return _defaultparams.size(); }
|
|
int64_t getCurrentPos(){return _instructions.size()-1;}
|
|
int64_t getNumericConstant(const int64_t cons);
|
|
int64_t getNumericConstant(const float_t cons);
|
|
int64_t pushLocalVariable(const rabbit::Object &name);
|
|
void addParameter(const rabbit::Object &name);
|
|
//void addOuterValue(const rabbit::Object &name);
|
|
int64_t getLocalVariable(const rabbit::Object &name);
|
|
void markLocalAsOuter(int64_t pos);
|
|
int64_t getOuterVariable(const rabbit::Object &name);
|
|
int64_t generateCode();
|
|
int64_t getStacksize();
|
|
int64_t calcStackFramesize();
|
|
void addLineInfos(int64_t line,bool lineop,bool force=false);
|
|
rabbit::FunctionProto *buildProto();
|
|
int64_t allocStackPos();
|
|
int64_t pushTarget(int64_t n=-1);
|
|
int64_t popTarget();
|
|
int64_t topTarget();
|
|
int64_t getUpTarget(int64_t n);
|
|
void discardTarget();
|
|
bool isLocal(uint64_t stkpos);
|
|
rabbit::Object createString(const char *s,int64_t len = -1);
|
|
rabbit::Object createTable();
|
|
bool isConstant(const rabbit::Object &name,rabbit::Object &e);
|
|
int64_t _returnexp;
|
|
etk::Vector<rabbit::LocalVarInfo> _vlocals;
|
|
etk::Vector<int64_t> _targetstack;
|
|
int64_t _stacksize;
|
|
bool _varparams;
|
|
bool _bgenerator;
|
|
etk::Vector<int64_t> _unresolvedbreaks;
|
|
etk::Vector<int64_t> _unresolvedcontinues;
|
|
etk::Vector<rabbit::ObjectPtr> _functions;
|
|
etk::Vector<rabbit::ObjectPtr> _parameters;
|
|
etk::Vector<rabbit::OuterVar> _outervalues;
|
|
etk::Vector<rabbit::Instruction> _instructions;
|
|
etk::Vector<rabbit::LocalVarInfo> _localvarinfos;
|
|
rabbit::ObjectPtr _literals;
|
|
rabbit::ObjectPtr _strings;
|
|
rabbit::ObjectPtr _name;
|
|
rabbit::ObjectPtr _sourcename;
|
|
int64_t _nliterals;
|
|
etk::Vector<rabbit::LineInfo> _lineinfos;
|
|
FuncState *_parent;
|
|
etk::Vector<int64_t> _scope_blocks;
|
|
etk::Vector<int64_t> _breaktargets;
|
|
etk::Vector<int64_t> _continuetargets;
|
|
etk::Vector<int64_t> _defaultparams;
|
|
int64_t _lastline;
|
|
int64_t _traps; //contains number of nested exception traps
|
|
int64_t _outers;
|
|
bool _optimization;
|
|
rabbit::SharedState *_sharedstate;
|
|
etk::Vector<FuncState*> _childstates;
|
|
int64_t getConstant(const rabbit::Object &cons);
|
|
private:
|
|
compilererrorFunc _errfunc;
|
|
void *_errtarget;
|
|
rabbit::SharedState *_ss;
|
|
};
|
|
}
|