-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathexefile.hpp
executable file
·59 lines (55 loc) · 1.5 KB
/
exefile.hpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
#ifndef EXEFILE_HPP
#define EXEFILE_HPP
#include"all.hpp"
class executeRexxCls;
//class execProcCls;
class executeFileRexxCls{
containFileCls *objectFile;
executeRexxCls *exRexx;
bool exitStmtExecuted;
variableValue resultVariable;
int indexCurProcedure;
execProcCls *curExeProc;
stackOfCallFunctionCls socaf;
int indexOfFindNameUp ;
void saveInStackFun(void);
void popOfStackFun(void);
public:
stringCls getNameFile(void)
{
return objectFile->getName();
}
void getNameFile(char *p1)
{
objectFile->getNameFile(p1);
}
void getNameProc(char *p1)
{
curExeProc->getNameProc(p1);
}
int getCurNoLine(void)
{
return curExeProc->getCurNoLine();
}
executeFileRexxCls(containFileCls * curF,executeRexxCls *er ,int iProc=0)
{ objectFile=curF ;indexCurProcedure=iProc;exRexx=er;
curExeProc=new execProcCls(objectFile->getProc(indexCurProcedure),this);
exitStmtExecuted=false;
resultVariable=variableValue("");
indexOfFindNameUp=0 ;
}
valBool callFunctionInThisFile(int i1,fCallContCls &);
valBool run(void)
{ tokenContainCls to1;
fCallContCls fcs12(to1);
return curExeProc->run(fcs12);
}
void exitStmtDetect(void);
valBool callFunction(fCallContCls &tt);
void setGlobalResultVar(variableValue retVal);
valBool findNameInUpFunc(stringCls <nameVar);
void addNameInUpFunc(stringCls <nameVar,variableValue &vv1);
valBool findNameArrInUpFunc(stringCls &nameString1);
void addArrNameInUpFunc(stringCls &nameString,variableValue &);
};
#endif