词法分析程序c

《词法分析程序c》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、#include#include#include#include〃判断读入的字符是否为字母boolisLetter(charc){if((c>=3&&c<='z')11(c>=TV&&c<=T)){returntrue;}elsereturnfalse;}〃判断读入的字符是否为数字boolisDigit(charc){if(c>='0‘&&c<=9){returntrue;}elsereturnfalse;}〃判断是否为关键字boolisKey(char*string){if(!str

2、cmp(string,Mif")

3、

4、!strcmp(string,',for,,)

5、

6、!strcmp(string,,,while',)

7、

8、istrcmp(string,"do")

9、

10、!strcmp(string,"return")

11、

12、!strcmp(string,"break”)

13、

14、!strcmp(string,"main',)

15、

16、!strcmp(string,Mint")

17、

18、!strcmp(string,"readM)

19、

20、!strcmp(string,“write”)

21、

22、!strcmp(string,,,double',)

23、

24、!strcmp(string,n

25、String"))returntrue;}elsereturnfalse;}boolisError(charch){if(ch==@

26、

27、ch==*$•11ch==&

28、

29、ch==#

30、

31、ch==ch==，A，){returntrue;}elsereturnfalse;}intmain(){intes=0;charstring[500]=””;〃存放文件中读出来的字符串charstr[1OO]=“”;/府放需要对比的字符串charch,c,ch1,ch2,ch3;//ch存放文件中的单个字符(翻译时用)，c存放文件中的单个字符(从文件中提取信息时用)charfilen

32、ame[20];〃文件名intj=O,n,l=O;printf(”请输入文件名进行词法翻译：n)；scanf(H%sH,filename);FILE*cfPtr,*fout=fopen(nresult.txt,,,nwH);〃定义输入输出文件if((cfPtr=fopen(filename,,,r,,))==NULL)1(£耳卅舊一)e-se宀wh=e(一feof(cfpm)宀s5ng=llgetc(cfp5、M>4亠4F-E-満対時事j+土inimH0>HPPHl::、、ms®3a■k制sir薯MsT^isiring=n・5j+±boo-checkHMUe

33、QrrorHfa-seu'JrHirue*、^^*-^^^for(iniiH0=AH=++)swiich(m)宀case??chnsiring三八if(chHLVr)宀p+土if(chHHs)宀Ch3us5ng〔i+^宀ifohnfprintf(fout；注释符for(n=i+2;n

34、

35、ch2!=7,){if(ch2==E0F){有葡吴“）；第％（1行!”,p）;//fprintf(fout,”程序prin廿(”注释有误break;}}elseif(

36、ch1=='*,&&ch2==7,){fprintf(fout,n注释符严ArT);i=i+2;break;}}}elsefprintf(fout,”分界符:7rT);m=0;}elseif(ch=='>*

37、

38、ch==<'

39、

40、ch=='!'

41、

42、ch=='=){if(!check){fprintf(fout,”标识符:％srT,str);i・・；m=0;check=true;}else{ch1=string[i4-1];{if(ch1=='=*){fprintf(fout,”双分界符:％c=”,ch);m=0;i=i+1;break;}else{fprin

43、tf(foutJ'^分界符:％c”,ch);m=0;}elseif(ch==ch==ch=={

44、

45、ch=='}'

46、

47、ch==*C

48、

49、ch==丁

50、

51、ch=*

52、

53、ch==T

54、ch==w){if(error){fprintf(fout,”此字符无法识别:%sH,str);error=false;check=true;}elseif(!check){fprintf(fout,”标识符:％s”,str);check=true;}m=5;//m原值为0,为了对case进行判断z当读入下一字符时跳转到case5}elseif(ch=='*){if(!check){

55、fprintf(fout