先上代码:
(其余后面完善)
#pragma once
#include<iostream>
#include<string>
#include <fstream>
#include <sstream>
#include<Windows.h>
#include \"tree.h\"
#include<stack>
bool success = 1;
using namespace std;
char ch;//字符变量,存放最新读进的源程序字符
char strToken[100];//字符数组,存放构成单词符号的字符串
int len = 0;//记录字符串的长度
string klabel[29] = { \"+\",\"-\",\"*\",\"/\",\"=\",\"#\",\"<\",\"<=\",\">\",\">=\",\",\",\";\",\":=\",\"(\",\")\",\".\",\"const\",\"var\",\"procedure\",\"begin\",\"end\",\"odd\",\"if\",\"then\",\"call\"
,\"while\",\"do\",\"read\",\"write\" };
string slabel[100] = {};
string clabel[100] = {};
string result[1000] = {};//保存所有单词的结果数组
int procedureId = 0;//记录当前的过程层数
int tableId = 0;//当前名字表的下标
int dx = 3;//当前层数的偏移地址
int ip = 0;//全局符号表的指针
int slen = 0;//标识符表的下标
int clen = 0;//常量表的下标
//判断是否为数字
const char *input;
int index = 0;
int codeId = 0;//代码的下标
bool isDigit()
{
if (ch < 58 && ch >= 48)
return true;
else
return false;
}
//判断是否为小写字母
bool issLetter()
{
if (ch <= 122 && ch >= 97)
return true;
else
return false;
}
bool isDigit(char ch1)
{
if (ch1 < 58 && ch1 >= 48)
return true;
else
return false;
}
//把字符串转化为数字
int strToint(string str)
{
int len = str.length();
int count = 0;
for (int i = 0; i < len; i++)
{
if (str.at(i) <= 57 && str.at(i) >= 48)
count = count + (str.at(i) - 48)*pow(10, len - i - 1);
else
return -1;
}
return count;
}
//把数字转化为字符串
//string intTostr(int num)
//{
//}
//判断是否为小写字母
bool issLetter(char ch1)
{
if (ch1 <= 122 && ch1 >= 97)
return true;
else
return false;
}
//判断是否为大写字母
bool islLetter()
{
if (ch <= 90 && ch >= 65)
return true;
else
return false;
}
//将下一输入字符读到ch中
void GetChar()
{
ch = input[index];
index++;
}
//判断ch中是否是空白,若是,则调用GetChar直至读入下一个非空白的字符
void GetBC()
{
while (ch == 32)
GetChar();
}
//将ch中的字符连接到strToken之后
void concat()
{
strToken[len] = ch;
len++;
}
//对strToken中的字符串查找保留字表,若他是一个保留字则返回则返回他的编码,否则返回0值
int Reserve()
{
for (int i = 0; i < 29; i++)
{
/*const char *p = klabel[i].data();
if (strcmp(p,strToken)==0)
{
return i;
}*/
if (klabel[i] == strToken)
return i;
}
return -1;
}
//将搜索指示器回调一个字符位置
void Retract()
{
index--;
ch = 32;
}
//将strToken中的标识符插入到符号表
int insertId()
{
slabel[slen] = strToken;
slen++;
return slen - 1;
}
//将strToken中的常数插入到常数表
int insertConst()
{
clabel[clen] = strToken;
clen++;
return clen - 1;
}
string readFileIntoString(char * filename)
{
ifstream ifile(filename);
//将文件读入到ostringstream对象buf中
ostringstream buf;
char ch;
while (buf&&ifile.get(ch))
buf.put(ch);
//返回与流对象buf关联的字符串
return buf.str();
}
//检测是否已经存在此标识符
int isexists(string str)
{
for (int i = 0; i < slen; i++)
if (str == slabel[i])
return 1;
return 0;
}
//检测是否已经存在此常量
int isexistc(string con)
{
for (int i = 0; i < clen; i++)
if (con == clabel[i])
return 1;
return -1;
}
int isexists()
{
for (int i = 0; i < slen; i++)
if (strToken == slabel[i])
return i;
return -1;
}
//检测是否已经存在此常量
int isexistc()
{
for (int i = 0; i < clen; i++)
if (strToken == clabel[i])
return i;
return -1;
}
//名字表的结构体
struct symble
{
string name;
string kind;
int addr;
int attribute;//val/value
}symlabel;
//判断是否退出
symble table[20];
//在符号表里查找某个标识符
int findSymble(string str)
{
for (int i = 0; i < tableId; i++)
{
if (table[i].name == str)
return i;
}
return -1;
}
//在符号表里根据地址查找变量的名字
string findSymble(int addr1)
{
for (int i = 0; i < tableId; i++)
{
if (table[i].addr == addr1)
return table[i].name;
}
return \"\";
}
//目标指令的结构体:
struct tarInstruc
{
string funcCode=\" \";
int levelDiff = 0;
int displacement = 0;
string content = \" \";
};
tarInstruc code[200];
//从关键字表查找关键字的下标
int findKlabel(string str)
{
for (int i = 0; i < 29; i++)
{
if (str == klabel[i])
return i+1;
}
return -1;
}
//添加code,运算类型
void codeAdd(string str,int lev,int place,string con)
{
code[codeId].funcCode = str;
code[codeId].levelDiff = lev;
code[codeId].displacement = place;
code[codeId].content = con;
codeId++;
}
//添加code,非运算
void codeAdd(string str, int lev, int place)
{
code[codeId].funcCode = str;
code[codeId].levelDiff = lev;
code[codeId].displacement = place;
codeId++;
}
//主程序
void lex(string file1)
{
int code, value, num = 0;
/*cout << \"请输入单词长度\"<<endl;
cin >> num;
cout << \"请输入单词:\"<<endl;
cin >> input;*/
//char filename[] = \"test.txt\";
//const char *file = readFileIntoString(filename).data();
std::ifstream in(file1);
std::ostringstream tmp;
tmp << in.rdbuf();
std::string str = tmp.str();
cout << str << endl;
for (int i = 0; i < str.length(); i++)//如果输入中有大写字母,则转换为小写字母
if (str.at(i) <= 90 && str.at(i) >= 65)
str.at(i) = str.at(i) + 32;
const char *file = str.data();
input = file;
while (input[index] != 0)
{
len = 0;
//strcpy(strToken,\"\");
memset(strToken, 0, sizeof(strToken));
//cout << strToken << endl;
//Sleep(1000);
GetChar();
GetBC();
if (issLetter())//判断是否是字母
{
while (issLetter() || isDigit())
{
concat();
GetChar();
}
Retract();
result[ip] = strToken;
ip++;
code = Reserve();
if (code == -1)//不在关键字表里,即为标识符
{
int index1 = isexists();//检测此标识符是否存在
if (index1 != -1)
cout << \"(\" << strToken << \",id,\" << index1 << \")\" << endl;
else
{
value = insertId();
cout << \"(\" << strToken << \",id,\" << value << \")\" << endl;//输出标识符的三元组
}//cout << strToken<<endl;
}
else
{
cout << \"(\" << klabel[code] << \",\" << klabel[code] << \",-)\" << endl;//输出关键字的二元组
}
}
else if (isDigit())//如果是数字,即为常量
{
while (isDigit())
{
concat();
GetChar();
}
Retract();
result[ip] = strToken;
ip++;
int index2 = isexistc();
if (index2 != -1)
cout << \"(\" << strToken << \",int,\" << index2 << \")\" << endl;
else
{
value = insertConst();
cout << \"(\" << strToken << \",int,\" << value << \")\" << endl;
}
}
/*else if (islLetter())
{
while(islLetter())
{
concat();
GetChar();
}
Retract();
code = Reserve();
if (code == -1)
cout << \"拼写错误\"<<endl;
else
cout << \"(\" << code << \",-)\" << endl;//输出关键字的二元组
}*/
else//其余情况
{
switch (ch)
{
case \'+\':
cout << \"(+,+,\" << \"-)\" << endl;
result[ip] = \"+\";
ip++;
break;
case \'-\':
cout << \"(-,-,\" << \"-)\" << endl;
result[ip] = \"-\";
ip++;
break;
case \'*\':
cout << \"(*,*,\" << \"-)\" << endl;
result[ip] = \"*\";
ip++;
break;
case \'/\':
cout << \"(/,/,\" << \"-)\" << endl;
result[ip] = \"/\";
ip++;
break;
case \'=\':
cout << \"(=,=,\" << \"-)\" << endl;
result[ip] = \"=\";
ip++;
break;
case \'#\':
cout << \"(#,#,\" << \"-)\" << endl;
result[ip] = \"#\";
ip++;
break;
case \'<\':
GetChar();
if (ch == \'=\')
{
cout << \"(<=,<=,\" << \"-)\" << endl;
result[ip] = \"<=\";
ip++;
}
else
{
Retract();
cout << \"(<,<,\" << \"-)\" << endl;
result[ip] = \"<\";
ip++;
}
break;
case \'>\':
GetChar();
if (ch == \'=\')
{
cout << \"(>=,>=,\" << \"-)\" << endl;
result[ip] = \">=\";
ip++;
}
else
{
Retract();
cout << \"(>,>,\" << \"-)\" << endl;
result[ip] = \">\";
ip++;
}
break;
case \',\':
cout << \"(,,,,\" << \"-)\" << endl;
result[ip] = \",\";
ip++;
break;
case \';\':
cout << \"(;,;,\" << \"-)\" << endl;
result[ip] = \";\";
ip++;
break;
case \':\':
GetChar();
if (ch == \'=\')
{
cout << \"(:=,:=,\" << \"-)\" << endl;
result[ip] = \":=\";
ip++;
}
else
{
Retract();
cout << \"(:,:,\" << \"-)\" << endl;
result[ip] = \":\";
ip++;
}
break;
case \'(\':
cout << \"((,(,\" << \"-)\" << endl;
result[ip] = \"(\";
ip++;
break;
case \')\':
cout << \"(),),\" << \"-)\" << endl;
result[ip] = \")\";
ip++;
break;
case \'.\':
cout << \"(.,.,\" << \"-)\" << endl;
result[ip] = \".\";
ip++;
break;
case 10://排除掉换行符
break;
default:
cout << \"拼写错误:\" << ch << endl;
break;
}
}
}
}
//函数声明
void subProgram(treeNode<string> *tN);
void conExplain(treeNode<string> *tN);
void varExplain(treeNode<string> *tN);
void processExplain(treeNode<string> *tN);
void constDef(treeNode<string> *tN);
void statement(treeNode<string> *tN);
void varExplain(treeNode<string> *tN);
void id(treeNode<string> *tN);
void unsInt(treeNode<string> *tN);
void dig(treeNode<string> *tN,int index);
void processHead(treeNode<string> *tN);
void AssignmentStatement(treeNode<string> *tN);
void (treeNode<string> *tN);
void CompoundStatement(treeNode<string> *tN);
void conditions(treeNode<string> *tN);
void AddAndSubtract(treeNode<string> *tN);
void item(treeNode<string> *tN);
void factor(treeNode<string> *tN);
void MULAndDIV(treeNode<string> *tN);
void ConditionStatement(treeNode<string> *tN);
void relationship(treeNode<string> *tN);
void processCall(treeNode<string> *tN);
void readStatement(treeNode<string> *tN);
void dowhile(treeNode<string> *tN);
void writeStatement(treeNode<string> *tN);
void letter(treeNode<string> *tN,int index);
void digit(treeNode<string> *tN,int index);
treeNode<string> *Tprogram=new treeNode<string>(2,\"<程序>\");
/*treeNode<string> *TsubProgram=new treeNode<string>(4,\"<分程序>\");
treeNode<string> *TconExplain = new treeNode<string>(\"<常量说明部分>\");
treeNode<string> *TvarExplain = new treeNode<string>(\"<变量说明部分>\");
treeNode<string> *TprocessExplain = new treeNode<string>(\"<过程说明部分>\");
treeNode<string> *Tstatement = new treeNode<string>(1,\"<语句>\");
treeNode<string> *TconstDef = new treeNode<string>(3,\"<常量定义>\");
treeNode<string> *TunsInt = new treeNode<string>(\"<无符号整数>\");
treeNode<string> *Tpoint = new treeNode<string>(\".\");
treeNode<string> *TprocessHead = new treeNode<string>(3,\"过程首部\");
treeNode<string> *Tid = new treeNode<string>(\"标识符\");
*/
void program()//程序
{
codeAdd(\"jmp\", 0, -1);//暂时填一个
ip = 0;
treeNode<string> *TsubProgram = new treeNode<string>(4,\"<分程序>\");
subProgram(TsubProgram);
if (result[ip] == \".\")
{
Tprogram->child[0] = TsubProgram;
Tprogram->child[1] = new treeNode<string>(\".\");
//**************目标代码的生成,最后的退出
codeAdd(\"opr\", 0, 0,\"return\");
//*************
cout << \"成功\";
}
else
exit(0);
}
void subProgram(treeNode<string> *tN)//分程序
{
int count = 4;
int tempTableId = tableId-1;
//常量说明部分
if (result[ip] == \"const\")
{
treeNode<string> *TconExplain = new treeNode<string>(\"<常量说明部分>\");
conExplain(TconExplain);
count++;
tN->child[0] = TconExplain;
}
//变量说明部分
if (result[ip] == \"var\")
{
treeNode<string> *TvarExplain = new treeNode<string>(\"<变量说明部分>\");
varExplain(TvarExplain);
count++;
tN->child[1] = TvarExplain;
}
//过程说明部分
if (result[ip] == \"procedure\")
{
treeNode<string> *TprocessExplain = new treeNode<string>(\"<过程说明部分>\");
processExplain(TprocessExplain);
count++;
tN->child[2] = TprocessExplain;
}
if (table[tempTableId].kind == \"proc\")
table[tempTableId].addr = codeId;
//**************目标代码的生成,开辟地址空间
int varNumber = 0;
for (int i = 0; i < tableId; i++)
if (table[i].attribute == procedureId && table[i].kind == \"var\")
varNumber++;
codeAdd(\"int\",0,varNumber+3);
//*************
treeNode<string> *Tstatement = new treeNode<string>(1,\"<语句>\");
//***************目标代码生成,直接跳转到主程序
if (procedureId == 0)
code[0].displacement = codeId-1;
//**********************
statement(Tstatement);//语句
tN->child[3]=Tstatement;
}
void conExplain(treeNode<string> *tN)//常量说明部分
{
if (result[ip] == \"const\")
{
ip++;
tN->child[0] = new treeNode<string>(\"const\");
treeNode<string> *TconstDef1 = new treeNode<string>(3, \"常量定义\");
tN->child[1] = TconstDef1;
constDef(TconstDef1);
int count = 0;
while (result[ip] == \",\")
{
count++;//树的孩子数
tN->child[2*count] = new treeNode<string>(\",\");
treeNode<string> *TconstDef2 = new treeNode<string>(3,\"常量定义\");
tN->child[2*count+1] = TconstDef2;
ip++;
constDef(TconstDef2);
}
if (result[ip] == \";\")
{
ip++;
//增加树的结构
tN->child[2*count + 2] = new treeNode<string>(\";\");
}
else
exit(0);
}
else
exit(0);
}
void varExplain(treeNode<string> *tN)//变量说明部分
{
if (result[ip] == \"var\")
{
ip++;
tN->child[0] = new treeNode<string>(\"var\");
treeNode<string> *Tid1 = new treeNode<string>(3, \"<标识符>\");
tN->child[1] = Tid1;
table[tableId].name = result[ip];
table[tableId].attribute = procedureId;
table[tableId].addr = dx;
table[tableId].kind = \"var\";
tableId++;
dx++;
id(Tid1);
int count = 0;
while (result[ip] == \",\")
{
ip++;
count++;
tN->child[2 * count] = new treeNode<string>(\",\");
treeNode<string> *Tid2 = new treeNode<string>(3, \"<标识符>\");
tN->child[2 * count + 1] = Tid2;
table[tableId].name = result[ip];
table[tableId].attribute = procedureId;
table[tableId].addr = dx;
table[tableId].kind = \"var\";
tableId++;
dx++;
id(Tid2);
}
if (result[ip] == \";\")
{
ip++;
tN->child[count + 1] = new treeNode<string>(\";\");
}
else
exit(0);
}
else
exit(0);
}
void processExplain(treeNode<string> *tN)//过程说明部分
{
procedureId++;//层数加1
dx = 3;//当前层数内地址变为1
treeNode<string> *TprocessHead = new treeNode<string>(3,\"<过程首部>\");
tN->child[0] = TprocessHead;
treeNode<string> *TsubProgram = new treeNode<string>( \"<分程序>\");
tN->child[1] = TsubProgram;
processHead(TprocessHead);
subProgram(TsubProgram);
if (result[ip] == \";\")
{
tN->child[2] = new treeNode<string>(\";\");
//**************目标代码的生成,过程说明结束
codeAdd(\"opr\", 0, 0,\"return\");
//*************
procedureId--;
ip++;
int count=0;
while (result[ip]==\"procedure\")
{
count++;
treeNode<string> *TprocessExplain = new treeNode<string>(\"<过程说明部分>\");
tN->child[count + 2] = TprocessExplain;
processExplain(TprocessExplain);
}
}
else
exit(0);
}
void statement(treeNode<string> *tN)//语句
{
if (isexists(result[ip]))//赋值语句
{
treeNode<string> *TAssignmentStatement = new treeNode<string>(3,\"<赋值语句>\");
tN->child[0] = TAssignmentStatement;
AssignmentStatement(TAssignmentStatement);
}
else if (result[ip] == \"if\")//条件语句
{
treeNode<string> *TConditionStatement = new treeNode<string>(3,\"<条件语句>\");
tN->child[0] = TConditionStatement;
ConditionStatement(TConditionStatement);
}
else if (result[ip] == \"while\")//当型循环
{
treeNode<string> *Tdowhile = new treeNode<string>(3,\"<当型循环语句>\");
tN->child[0] = Tdowhile;
dowhile(Tdowhile);
}
else if (result[ip] == \"call\")//过程调用
{
treeNode<string> *Tcall= new treeNode<string>(2, \"<过程调用语句>\");
tN->child[0] = Tcall;
processCall(Tcall);
}
else if (result[ip] == \"read\")//读语句
{
treeNode<string> *Tread = new treeNode<string>(2, \"<读语句>\");
tN->child[0] = Tread;
readStatement(Tread);
}
else if (result[ip] == \"write\")//写语句
{
treeNode<string> *Twrite = new treeNode<string>(2, \"<写语句>\");
tN->child[0] = Twrite;
writeStatement(Twrite);
}
else if (result[ip] == \"begin\")//复合语句
{
treeNode<string> *TCompoundStatement = new treeNode<string>(2, \"<复合语句>\");
tN->child[0] = TCompoundStatement;
CompoundStatement(TCompoundStatement);
}
}
void constDef(treeNode<string> *tN)//常量定义
{
treeNode<string> *Tid = new treeNode<string>( \"<标识符>\");
tN->child[0] = Tid;
table[tableId].name = result[ip];
table[tableId].kind = \"const\";
id(Tid);
if (result[ip] == \"=\")
{
tN->child[1] = new treeNode<string>(\"=\");
ip++;
treeNode<string> *TunsInt = new treeNode<string>(\"<无符号整数>\");
tN->child[2] = TunsInt;
table[tableId].attribute = strToint(result[ip]);
tableId++;
unsInt(TunsInt);
}
else
exit(0);
}
void id(treeNode<string> *tN)//标识符
{
/*if (isexists(result[ip]))
{
tN->child[0] = new treeNode<string>(result[ip]);
ip++;
}
else
exit(0);
*/
int index=0;
treeNode<string> *Tletter1 = new treeNode<string>(\"<字母>\");
tN->child[0] = Tletter1;
letter(Tletter1,0);
index++;
int max = result[ip].length();
for (index=1; index < max && ((result[ip].at(index) >= 97 && result[ip].at(index) <= 122) ||
(result[ip].at(index) >= 48 && result[ip].at(index) <= 57)); index++)
{
if (result[ip].at(index) >= 97 && result[ip].at(index) <= 122)
{
treeNode<string> *Tletter2 = new treeNode<string>(\"<字母>\");
tN->child[index] = Tletter2;
letter(Tletter2, index);
}
else
{
treeNode<string> *Tdig = new treeNode<string>(\"<数字>\");
tN->child[index] = Tdig;
dig(Tdig, index);
}
}
ip++;
}
void unsInt(treeNode<string> *tN)//无符号整数
{
/*if (isexistc(result[ip]))
{
tN->child[0] = new treeNode<string>(result[ip]);
ip++;
}
else
exit(0);*/
int index = 0;
treeNode<string> *Tdig1 = new treeNode<string>(\"<数字>\");
tN->child[0] = Tdig1;
dig(Tdig1, 0);
index++;
int max = result[ip].length();
for (index = 1; index < max && (result[ip].at(index) >= 48 && result[ip].at(index) <= 57); index++)
{
if (result[ip].at(index) >= 48 && result[ip].at(index) <= 57)
{
treeNode<string> *Tdig2 = new treeNode<string>(\"<数字>\");
tN->child[index] = Tdig2;
dig(Tdig2, index);
}
}
ip++;
}
void letter(treeNode<string> *tN,int index1)
{
if (result[ip].at(index1) >= 97 && result[ip].at(index1) <= 122)
{
string str;
stringstream stream;
stream << result[ip].at(index1);
str = stream.str();//将char转换为string
tN->child[0] = new treeNode<string>(str);
}
else
exit(0);
}
void dig(treeNode<string> *tN,int index)//数字
{
if (result[ip].at(index) <= 57 && result[ip].at(index) >= 48)
{
string str;
stringstream stream;
stream << result[ip].at(index);
str = stream.str();//将char转换为string
tN->child[0] = new treeNode<string>(str);
}
else
exit(0);
}
void processHead(treeNode<string> *tN)//过程首部
{
if (result[ip] == \"procedure\")
{
ip++;
tN->child[0] = new treeNode<string>(\"procedure\");
treeNode<string> *Tid = new treeNode<string>(\"<标识符>\");
tN->child[1] = Tid;
/******/
table[tableId].kind = \"proc\";
table[tableId].name = result[ip];
table[tableId].addr = codeId;
table[tableId].attribute = procedureId-1;
tableId++;
id(Tid);
/****************/
if (result[ip] == \";\")
{
ip++;
tN->child[1] = new treeNode<string>(\";\");
}
else
exit(0);
}
else
exit(0);
}
void AssignmentStatement(treeNode<string> *tN)//赋值语句
{
treeNode<string> *Tid = new treeNode<string>(\"<标识符>\");
tN->child[0] = Tid;
int tempIp = ip;//暂存ip
id(Tid);
if (result[ip] == \":=\")
{
ip++;
tN->child[1] = new treeNode<string>(\":=\");
treeNode<string> *T = new treeNode<string>(\"<表达式>\");
tN->child[3] = T ;
(T );
//**************目标代码的生成,赋值语句
int tableIndex = findSymble(result[tempIp]);
if (tableIndex == -1)
{
cout << \"此变量未定义\" << endl;
exit(0);
}
codeAdd(\"sto\", abs(table[tableIndex].attribute - procedureId), table[tableIndex].addr);
//*************
}
else
exit(0);
}
void (treeNode<string> *tN)//表达式
{
if (result[ip] == \"+\" || result[ip] == \"-\")
{
ip++;
tN->child[0] = new treeNode<string>(result[ip]);
}
treeNode<string> *Titem = new treeNode<string>(\"<项>\");
tN->child[1]=Titem;
item(Titem);
int count = 0;
while (result[ip] == \"+\" || result[ip] == \"-\")
{
count++;
treeNode<string> *TAddAndSubtract = new treeNode<string>(\"<加减运算符>\");
tN->child[2*count] = TAddAndSubtract;
treeNode<string> *Titem = new treeNode<string>(\"<项>\");
tN->child[2 * count+1] = Titem;
int tempIp = ip;//暂存Ip
AddAndSubtract(TAddAndSubtract);
item(Titem);
//**************目标代码的生成,加减运算
codeAdd(\"opr\", 0, findKlabel(result[tempIp]), result[tempIp]);
//*************
}
}
void CompoundStatement(treeNode<string> *tN)//复合语句
{
if (result[ip] == \"begin\")
{
tN->child[0] = new treeNode<string>(\"begin\");
ip++;
treeNode<string> *Tstatement1 = new treeNode<string>(\"<语句>\");
tN->child[1] = Tstatement1;
statement(Tstatement1);
int count = 0;
while (result[ip] == \";\")
{
ip++;
count++;
tN->child[2 * count] = new treeNode<string>(\";\");
treeNode<string> *Tstatement2 = new treeNode<string>(\"<语句>\");
tN->child[2 * count + 1] = Tstatement2;
statement(Tstatement2);
}
if (result[ip] == \"end\")
{
tN->child[2 * count+2] = new treeNode<string>(\"end\");
ip++;
}
else
exit(0);
}
else
exit(0);
}
void conditions(treeNode<string> *tN)//条件
{
if (result[ip] == \"odd\")
{
ip++;
tN->child[0] =new treeNode<string>(\"odd\");
treeNode<string> *T = new treeNode<string>(\"<表达式>\");
(T );tN->child[1] = T ;
//***********目标代码生成,odd运算
codeAdd(\"opr\",0,findKlabel(\"odd\"),\"odd\");
//
}
else
{
treeNode<string> *T 1 = new treeNode<string>(\"<表达式>\");
tN->child[0] = T 1;
(T 1);
treeNode<string> *Trealationship = new treeNode<string>(\"<关系运算符>\");
tN->child[1] = Trealationship;
int tempIp = ip;//保存ip
relationship(Trealationship);
treeNode<string> *T 2 = new treeNode<string>(\"<表达式>\");
tN->child[2] = T 2;
(T 2);
//**************目标代码的生成,加减运算
codeAdd(\"opr\", 0, findKlabel(result[tempIp]), result[tempIp]);
//*************
}
}
void item(treeNode<string> *tN)//项
{
treeNode<string> *Tfactor1 = new treeNode<string>(\"<因子>\");
tN->child[0] = Tfactor1;
factor(Tfactor1);
int count = 0;
while (result[ip]==\"*\"|| result[ip] == \"/\")
{
count++;
treeNode<string> *TMULAndDIV = new treeNode<string>(\"<乘除运算符>\");
tN->child[2*count-1] = TMULAndDIV;
int tempIp = ip;//暂存Ip
MULAndDIV(TMULAndDIV);
treeNode<string> *Tfactor2 = new treeNode<string>(\"<因子>\");
tN->child[2*count] = Tfactor2;
factor(Tfactor2);
//**************目标代码的生成,加减运算
codeAdd(\"opr\", 0, findKlabel(result[tempIp]), result[tempIp]);
//*************
}
}
void factor(treeNode<string> *tN)//因子
{
if ((result[ip].at(0) <= 122 && result[ip].at(0) >= 97))
{
treeNode<string> *Tid = new treeNode<string>(\"<标识符>\");
tN->child[0] = Tid;
//*********判断标识符为变量还是常量
int tableIndex = findSymble(result[ip]);
if (tableIndex != -1)
{
if (table[tableIndex].kind == \"const\")
{
codeAdd(\"lit\", 0, table[tableIndex].attribute);
}
else if (table[tableIndex].kind == \"var\")
{
codeAdd(\"lod\", abs(table[tableIndex].attribute - procedureId), table[tableIndex].addr);
}
}
//****************/
id(Tid);
}
else if ((result[ip].at(0) <= 57 && result[ip].at(0) >= 48))
{
treeNode<string> *TunsInt = new treeNode<string>(\"<无符号整数>\");
tN->child[0] = TunsInt;
//****************目标代码生成,常数
codeAdd(\"lit\",0,strToint(result[ip]));
//
unsInt(TunsInt);
}
else if ((result[ip] == \"(\"))
{
tN->child[0] = new treeNode<string>(\"(\");
treeNode<string> *T = new treeNode<string>(\"<表达式>\");
tN->child[1] = T ;
(T );
if (result[ip] == \")\")
{
tN->child[2] = new treeNode<string>(\")\");
ip++;
}
else
exit(0);
}
else
exit(0);
}
void AddAndSubtract(treeNode<string> *tN)//加减运算符
{
if (result[ip] == \"+\" || result[ip] == \"-\")
{
tN->child[0] = new treeNode<string>(result[ip]);
ip++;
}
else
exit(0);
}
void MULAndDIV(treeNode<string> *tN)//乘除运算符
{
if (result[ip] == \"*\" || result[ip] == \"/\")
{
tN->child[0] = new treeNode<string>(result[ip]);
ip++;
}
else
exit(0);
}
void relationship(treeNode<string> *tN)//关系运算符
{
if (result[ip] == \"=\" || result[ip] == \"#\"||result[ip]==\"<\"|| result[ip] == \"<=\"||result[ip] == \">\"
||result[ip] == \">=\")
{
tN->child[0] = new treeNode<string>(result[ip]);
ip++;
}
else
exit(0);
}
void ConditionStatement(treeNode<string> *tN)//条件语句
{
if (result[ip] == \"if\")
{
tN->child[0] = new treeNode<string>(\"if\");
ip++;
treeNode<string> *Tconditions = new treeNode<string>(\"<条件>\");
tN->child[1] = Tconditions;
conditions(Tconditions);
//**************目标代码的生成,非真则跳转
codeAdd(\"jpc\", 0, 0);//暂时先填着地址0
int tempId = codeId - 1;
//*************
if (result[ip] == \"then\")
{
ip++;
tN->child[0] = new treeNode<string>(\"then\");
treeNode<string> *Tstatement = new treeNode<string>(\"<语句>\");
tN->child[1] = Tstatement;
statement(Tstatement);
//回填之前的jpc
code[tempId].displacement = codeId;
//*************
}
else
exit(0);
}
else
exit(0);
}
void processCall(treeNode<string> *tN)//过程调用语句
{
if (result[ip] == \"call\")
{
ip++;
treeNode<string> *Tid = new treeNode<string>(\"<标识符>\");
tN->child[0] = Tid;
//****************目标代码生成,过程调用
int tempAddr = 0;
int tempId = 0;
for (int i = 0; i < tableId; i++)
{
if (table[i].name == result[ip])
{
tempAddr = table[i].addr;
tempId = i;
break;
}
}
codeAdd(\"cal\",abs(procedureId-table[tempId].attribute),tempAddr);
//**********************************8
id(Tid);
}
else
exit(0);
}
void dowhile(treeNode<string> *tN)//当型循环
{
if (result[ip] == \"while\")
{
tN->child[0] = new treeNode<string>(\"while\");
ip++;
int tempAddr = codeId+1;//while循环的入口地址
treeNode<string> *Tconditions = new treeNode<string>(\"<条件>\");
tN->child[1] = Tconditions;
conditions(Tconditions);
//**************目标代码的生成,非真则跳转
codeAdd(\"jpc\", 0, 0);//暂时先填着地址0
int tempId = codeId-1;
//*************
if (result[ip] == \"do\")
{
tN->child[2] = new treeNode<string>(\"do\");
ip++;
treeNode<string> *Tstatement = new treeNode<string>(\"<语句>\");
tN->child[3] = Tstatement;
statement(Tstatement);
//**************目标代码的生成,无条件跳转
codeAdd(\"jmp\", 0, tempAddr);
//回填之前的jpc
code[tempId].displacement = codeId;
//*************
}
else
success = 0;
}
else
exit(0);
}
void readStatement(treeNode<string> *tN)//读语句
{
if (result[ip] == \"read\")
{
tN->child[0] = new treeNode<string>(\"read\");
//**************目标代码的生成,读语句
codeAdd(\"opr\", 0, findKlabel(result[ip]), result[ip]);
//*************
ip++;
if (result[ip] == \"(\")
{
tN->child[1] = new treeNode<string>(\"(\");
ip++;
treeNode<string> *Tid1 = new treeNode<string>(\"<标识符>\");
tN->child[2] = Tid1;
//*******************目标代码的生成,结果的传递
int tableIndex = findSymble(result[ip]);
if (tableIndex == -1)
{
cout << \"未定义此变量\" << endl;
exit(0);
}
codeAdd(\"sto\", abs(table[tableIndex].attribute - procedureId), table[tableIndex].addr);
//********************
id(Tid1);
int count = 0;
while (result[ip] == \",\")
{
count++;
tN->child[2*count+1] = new treeNode<string>(\",\");
ip++;
//**************目标代码的生成,读语句
codeAdd(\"opr\", 0, findKlabel(\"read\"), \"read\");
//*************
treeNode<string> *Tid2 = new treeNode<string>(\"<标识符>\");
tN->child[2*count+2] = Tid2;
//*******************目标代码的生成,结果的传递
tableIndex = findSymble(result[ip]);
codeAdd(\"sto\", 0, table[tableIndex].addr);
//********************
id(Tid2);
}
if (result[ip] == \")\")
{
tN->child[2*count+3] = new treeNode<string>(\")\");
ip++;
}
else
exit(0);
}
else
exit(0);
}
else
exit(0);
}
void writeStatement(treeNode<string> *tN)//写语句
{
if (result[ip] == \"write\")
{
tN->child[0] = new treeNode<string>(\"write\");
ip++;
if (result[ip] == \"(\")
{
ip++;
tN->child[1] = new treeNode<string>(\"(\");
treeNode<string> *T 1 = new treeNode<string>(\"<表达式>\");
tN->child[2] = T 1;
(T 1);
//**************目标代码的生成,写语句
codeAdd(\"opr\", 0, findKlabel(\"write\"), \"write\");
//*************
int count = 0;
while (result[ip] == \",\")
{
count++;
ip++;
tN->child[2 * count + 1] = new treeNode<string>(\",\");
treeNode<string> *T 2 = new treeNode<string>(\"<表达式>\");
tN->child[2 * count + 2] = T 2;
(T 2);
//**************目标代码的生成,写语句
codeAdd(\"opr\", 0, findKlabel(\"write\"), \"write\");
//*************
}
if (result[ip] == \")\")
{
tN->child[2 * count + 3] = new treeNode<string>(\")\");
ip++;
}
else
exit(0);
}
else
exit(0);
}
else
exit(0);
}
继续阅读与本文标签相同的文章
上一篇 :
游戏黑科技之:教你如何成为一名真正的键盘侠
下一篇 :
https nginx
-
权威报告:中国专利申请连续8年居首,占世界一半
2026-05-18栏目: 教程
-
新技术:AI可快速准确检测因糖尿病造成的视网膜病变
2026-05-18栏目: 教程
-
GPS轨迹分析工具,附使用指导
2026-05-18栏目: 教程
-
字节跳动要做一款24小时在家陪读的AI教练,原锤子团队参与研发
2026-05-18栏目: 教程
-
全能扫描工具,支持OCR文字识别,全平台
2026-05-18栏目: 教程
