简单词法分析程序.docxVIP

#include stdio.h#include stdlib.h#include string.h#define _KEY_WORD_END #typedef struct{int typenum;char * word;}WORD;char input[255];char token[255] = ;int p_input;int p_token;char ch;char * rwtab[] = {begin,if,then,while,do,end,_KEY_WORD_END};WORD* scaner();void main(){int over = 1;WORD* oneword = new WORD;printf(Enter Your words(end with #):);scanf(%[^#]s,input);p_input = 0;printf(Your words:\n%s\n,input);while(over1000over!=-1){oneword = scaner();if(oneword-typenum1000)printf((%d,%s),oneword-typenum,oneword-word);over = oneword-typenum;}printf(\npress # to exit:);scanf(%[^#]s,input);}char m_getch(){ch = input[p_input];p_input = p_input+1;return (ch);}void getbc(){while(ch== ||ch == 10){ch = input[p_input];p_input = p_input+1;}}void concat(){token[p_token] = ch;p_token = p_token+1;token[p_token] = \0;}int letter(){if(ch=ach=z||ch=Ach=Z) return 1;else return 0;}int digit(){if(ch=0ch=9) return 1;else return 0;}int reserve(){int i = 0;while(strcmp(rwtab[i],_KEY_WORD_END)){if(!strcmp(rwtab[i],token)){return i+1;}i = i+1;}return 10;}void retract(){p_input = p_input-1;}char* dtb(){return NULL;}WORD* scaner(){WORD* myword = new WORD;myword-typenum = 10;myword-word = ;p_token = 0;m_getch();getbc();if(letter()){while(letter()||digit()){concat();m_getch();}retract();myword-typenum = reserve();myword-word = token;return(myword);}else if(digit()){while(digit()){concat();m_getch();}retract();myword-typenum=20;myword-word = token;return(myword);}else switch(ch){case=: m_getch();if(ch ===){myword-typenum = 39;myword-word = ==;return(myword);}retract();myword-typenum = 21;myword-word==;return(myword);break;case+: myword-typenum = 22;myword-word = +;return(myword);break;case-: myword-typenum = 23;myword-word = -;return(myword);break; case*: myword-typenum = 24;myword-word = *;return(myword);break;case/: myword-typenum = 25;myword-word = /;return(myword);break;case(: myword-typenum = 26;myword-word = (;return(myword);break;case): myword-typenum = 27;myword-word = );return(