lin.h

设计SAMPLE语言的词法分析器 检查要求： a] 启动程序后

/* 关键字个数 */ 
#define norw 15
/* 名字表容量 */ 
#define txmax 100 
/* 所有的add1用于定义数组 */ 
#define txmaxadd1 101 
/* number的最大位数 */ 
#define nmax 14 
/* 符号的最大长度 */ 
#define al 10 
/* 地址上界 */ 
#define amax 2047 
/* 最大允许过程嵌套声明层数 */ 
#define levmax 3 
/* 最多的虚拟机代码数 */ 
#define cxmax 200 
#define cxmaxadd1 201 

/* 当函数中会发生fatal error时，返回-1告知调用它的函数，最终退出程序 */ 
#define getsymdo if(-1==getsym())return -1 
#define getchdo if(-1==getch())return -1 




#define conditiondo(a,b,c) if(-1==condition(a,b,c))return -1 

#define constdeclarationdo(a,b,c) if(-1==constdeclaration(a,b,c))return -1 
#define vardeclarationdo(a,b,c) if(-1==vardeclaration(a,b,c))return -1 



//typedef enum{Isfalse,Isture} ESC_BOOL;

/* 符号 */ 
enum symbol {nul,ident,number,plus,minus,times,slash,oddsym,eql,neq,lss,leq,gtr,geq,lparen,rparen,comma,colon,semicolon,period,becomes,beginsym,endsym,ifsym,thensym,whilesym,andsym,readsym,dosym,repeatsym,constsym,varsym,procsym,untilsym,elsesym}; 
#define symnum 32 

/* 名字表中的类型 */ 
enum object {constant,variable,procedur}; 

/* 虚拟机代码 */ 
enum fct {lit,opr,lod,sto,cal,inte,jmp,jpc}; 
#define fctnum 8 

/* 虚拟机代码结构 */ 
struct instruction 
{ 
enum fct f; /* 虚拟机代码指令 */ 
int l; /* 引用层与声明层的层次差 */ 
int a; /* 根据f的不同而不同 */ 
}; 
struct codeid
{

	char  a;
	char  x[al];
	char  y[al];
	char  z[al];
	char  w[al];
	char  b;
	char  c;
	char  d;
};
 

FILE* fa1; /* 输出源文件及其各行对应的首地址 */ 

bool listswitch; /* 显示虚拟机代码与否 */ 
bool tableswitch; /* 显示名字表与否 */ 
char ch; /* 获取字符的缓冲区，getch 使用 */ 
enum symbol sym; /* 当前的符号 */ 
char id[al]; /* 当前ident */ 
int i=0;
int num; /* 当前number */ 
int cc,ll,kk; /* getch使用的计数器，cc表示当前字符(ch)的位置 */ 
int cx; /* 虚拟机代码指针 */ 
int dx=0;/*输出序列号*/
int z=1;/*Ti*/
int re;/*回填数字*/
char line[81]; /* 读取行缓冲区 */ 
char a[al]; /* 临时符号 */ 
char b[al];
char e[al];
struct instruction code[cxmaxadd1]; /* 存放虚拟机代码的数组 */ 
struct  codeid  cd[cxmax];
char word[norw][al]; /* 保留字 */ 
enum symbol wsym[norw]; /* 保留字对应的符号值 */ 
enum symbol ssym[256]; /* 单字符的符号值 */ 
char mnemonic[fctnum][5]; /* 虚拟机代码指令名称 */ 
bool declbegsys[symnum]; /* 表示声明开始的符号集合 */ 
bool statbegsys[symnum]; /* 表示语句开始的符号集合 */ 
bool facbegsys[symnum]; /* 表示因子开始的符号集合 */ 
char record[al];/*记录数组*/
/* 名字表结构 */ 
struct tablestruct 
{ 
char name[al]; /* 名字 */ 
enum object kind; /* 类型：const,var or procedure */ 
int val; /* 数值，仅const使用 */ 
int level; /* 所处层，仅const不使用 */ 
int adr; /* 地址，仅const不使用 */ 
int size; /* 需要分配的数据区空间，仅procedure使用 */ 
}; 

struct tablestruct table[txmaxadd1]; /* 名字表 */ 

FILE* fin; 
FILE* fout; 
char fname[al]; 
int err; /* 错误计数器 */ 

void error(int n);  
int getsym(); 
int getch(); 
void init(); 


int block(int lev,int tx,bool* fsys); 


char factor(bool* fsys,int* ptx,int lev); 
char term(bool* fsys,int* ptx,int lev); 
int condition(bool* fsys,int* ptx,int lev); 
char expression(bool* fsys,int* ptx,int lev); 
int statement(bool* fsys,int* ptx,int lev); 
int gen(char[],char[],char[],char[]);
int vardeclaration(int* ptx,int lev,int* pdx); 
int constdeclaration(int* ptx,int lev,int* pdx);