资源描述：
《pl0源代码知识讲解.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、源代码pl0c.h/*关键字个数*/#definenorw13/*名字表容量*/#definetxmax100/*所有的add1用于定义数组*/#definetxmaxadd1101/*number的最大位数*/#definenmax14/*符号的最大长度*/#defineal10/*地址上界*/#defineamax2047/*最大允许过程嵌套声明层数*/#definelevmax3/*最多的虚拟机代码数*/#definecxmax200#definecxmaxadd1201/*当函数中会发生fatalerror时，返回-1告知调用它的函数，最终退出程序*/
2、#definegetsymdoif(-1==getsym())return-1#definegetchdoif(-1==getch())return-1#definetestdo(a,b,c)if(-1==test(a,b,c))return-1#definegendo(a,b,c)if(-1==gen(a,b,c))return-1#defineexpressiondo(a,b,c)if(-1==expression(a,b,c))return-1#definefactordo(a,b,c)if(-1==factor(a,b,c))return-1#defi
3、netermdo(a,b,c)if(-1==term(a,b,c))return-1#defineconditiondo(a,b,c)if(-1==condition(a,b,c))return-1#definestatementdo(a,b,c)if(-1==statement(a,b,c))return-1#defineconstdeclarationdo(a,b,c)if(-1==constdeclaration(a,b,c))return-1#definevardeclarationdo(a,b,c)if(-1==vardeclaration(a,b,
4、c))return-1typedefenum{false,true}bool;/*符号*/enumsymbol{nul,ident,number,plus,minus,times,slash,oddsym,eql,neq,lss,leq,gtr,geq,lparen,rparen,comma,semicolon,period,becomes,beginsym,endsym,ifsym,thensym,whilesym,writesym,readsym,dosym,callsym,constsym,varsym,procsym};#definesymnum32/
5、*名字表中的类型*/enumobject{constant,variable,procedur};/*虚拟机代码*/enumfct{lit,opr,lod,sto,cal,inte,jmp,jpc};#definefctnum8/*虚拟机代码结构*/structinstruction{enumfctf;/*虚拟机代码指令*/intl;/*引用层与声明层的层次差*/inta;/*根据f的不同而不同*/};FILE*fas;/*输出名字表*/FILE*fa;/*输出虚拟机代码*/FILE*fa1;/*输出源文件及其各行对应的首地址*/FILE*fa2;/*输出结果
6、*/boollistswitch;/*显示虚拟机代码与否*/booltableswitch;/*显示名字表与否*/charch;/*获取字符的缓冲区，getch使用*/enumsymbolsym;/*当前的符号*/charid[al];/*当前ident*/intnum;/*当前number*/intcc,ll,kk;/*getch使用的计数器，cc表示当前字符(ch)的位置*/intcx;/*虚拟机代码指针*/charline[81];/*读取行缓冲区*/chara[al];/*临时符号*/structinstructioncode[cxmaxadd1];/
7、*存放虚拟机代码的数组*/charword[norw][al];/*保留字*/enumsymbolwsym[norw];/*保留字对应的符号值*/enumsymbolssym[256];/*单字符的符号值*/charmnemonic[fctnum][5];/*虚拟机代码指令名称*/booldeclbegsys[symnum];/*表示声明开始的符号集合*/boolstatbegsys[symnum];/*表示语句开始的符号集合*/boolfacbegsys[symnum];/*表示因子开始的符号集合*//*名字表结构*/structtablestruct{ch
8、arname[al];/*名字*/en
