#include
#include
#include

void??main（void）;
int?reserver（char?*）;

void?main（void）
{
?FILE?*input*output;
?char?ch*token=““;
?int?i=0isReserver=0;
?int?count=0;
?/*打開文件*/
?if（（input=fopen（“input.txt““rt“））==NULL）
?{?printf（“file?open?in?readonly?modebut?an?error?generate!\n“）;
??exit（0）;
?}
?if（（output=fopen（“output.txt““wt“））==NULL）
?{
??printf（“file?open?in?new_create?modebut?an?error?generate!\n“）;
??exit（0）;
?}
?
?fprintf（output“%4s\t\%8s\t?%-16s）\t%4s\n““位置““符號(hào)類型““識(shí)別符““長(zhǎng)度“）;
?ch=fgetc（input）;
?while（ch!=EOF）
?{
??i=0;
??/*去掉前導(dǎo)空格換行符*/
??while（（ch==‘?‘||ch==‘\n‘||ch==‘\t‘）&&ch!=EOF）
???ch=fgetc（input）;
??/*字母開頭*/
??if（isalpha（ch））
??{
??while（isalpha（ch）||isdigit（ch））
???{
???token[i++]=ch;
???ch=fgetc（input）;
???}

??token[i]=‘\0‘;
??isReserver=reserver（token）;
??if（isReserver==1）
???{count++;fprintf（output“%4d\t（標(biāo)識(shí)符\t\t%-16s）\t%4d\n“counttokeni）;}
??else?if（isReserver==0）
???{count++;fprintf（output“%4d\t（保留字\t\t%-16s）\t%4d\n“counttokeni）;}
??else?if（isReserver==2）
???{count++;fprintf（output“%4d\t（算符\t\t%-16s）\t%4d\n“counttokeni）;}
??continue;???
??}
??/*識(shí)別數(shù)字*/
??else?if（isdigit（ch））
???{
????while（isdigit（ch））
????{
????token[i++]=ch;
????ch=fgetc（input）;
????}
???/*出現(xiàn)非數(shù)字且為點(diǎn)時(shí)*/???
???if?（ch==‘.‘）
????{
????token[i++]=ch;?/*將點(diǎn)加入*/
????ch=fgetc（input）;/*讀入下一個(gè)字符*/
????if?（isdigit（ch））
?????{
??????while（isdigit（ch））?/*是數(shù)字時(shí)，收入，并將加一*/
??????{
??????token[i++]=ch;
??????ch=fgetc（input）;
??????}
??????/*如果是數(shù)字加點(diǎn)再加數(shù)字再出現(xiàn)字母時(shí)，就是錯(cuò)誤*/
?????????????if（isalpha（ch））
??????{
???????while（isdigit（ch）||isalpha（ch）||ch==‘.‘）
???????{
????????token[i++]=ch;
????????ch=fgetc（input）;
???????}
???????token[i]=‘\0‘;
???????count++;fprintf（output“%4d\t（標(biāo)識(shí)錯(cuò)誤\t%-16s）\t%4d\n“counttokeni）;
???????continue;?
??????}
??????/*當(dāng)出現(xiàn)結(jié)束符時(shí)，就收入為實(shí)數(shù)內(nèi)*/
??????else
??????{
??????token[i]=‘\0‘;
??????count++;fprintf（output“%4d\t（實(shí)數(shù)\t\t%-16s）\t%4d\n“counttokeni）;
??????continue;
??????}
?????}
????}
???
???/*如果是字符則判斷為標(biāo)識(shí)錯(cuò)誤*/
???else?if（isalpha（ch））
????{
?????while（isdigit（ch）||isalpha（ch）||ch==‘.‘）??????
?????{
?????token[i++]=ch;
?????ch=fgetc（input）;
?????}
?????token[i]=‘\0‘;
?????count++;fprintf（output“%4d\t（標(biāo)識(shí)錯(cuò)誤\t%-16s）\t%4d\n“token）;
?????continue;?
????}
???/*如果是單詞段結(jié)束符時(shí)，就判斷為常數(shù)*/??
???else
????{
?????token[i]=‘\0‘;
?????count++;fprintf（output“%4d\t（常數(shù)\t\t%-16s）\t%4d\n“counttokeni）;
?????continue;
????}
???}?????
??else?if（ch==‘（‘）
???{
????token[i++]=ch;
????ch=fgetc（input）;
????token[i]=‘\0‘;
????count++;fprintf（output“%4d\t（右括號(hào)運(yùn)算符\t%-16s）\t%4d\n“counttokeni）;
????continue;
???}
??else?if（ch==‘）‘）
???{
???token[i++]=ch;
???ch=fgetc（input）;
???token[i]=‘\0‘;
???count++;fprintf（output“%4d\t（左括號(hào)運(yùn)算符\t%-16s）\t%4d\n“counttokeni）;
???continue;
???}
??else?if（ch==‘[‘）
???{
???token[i++]=ch;
???ch=fgetc（input）;
???token[i]=‘\0‘;
???count++;fprintf（output“%4d\t（右中括號(hào)運(yùn)算符\t%

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件????????828??2009-10-14?17:27??編譯原理0\analysis_table.txt

?????文件?????????56??2009-10-14?17:06??編譯原理0\chanshengshi.txt

?????文件?????175104??2007-07-08?19:27??編譯原理0\編譯原理實(shí)驗(yàn)指導(dǎo)書.doc

?????文件???????6875??2009-09-26?13:17??編譯原理0\OUTPUT.TXT

?????文件???????9376??2009-09-26?13:16??編譯原理0\shyan1.c

?????文件????????458??2009-09-26?13:12??編譯原理0\input.txt

?????文件????????225??2009-09-26?13:05??編譯原理0\keyword.txt

?????文件??????30148??2009-10-14?17:32??編譯原理0\實(shí)驗(yàn)2預(yù)測(cè)分析表.cpp

?????文件??????77312??2007-04-09?14:36??編譯原理0\詞法分析程序流程圖.doc

?????目錄??????????0??2006-03-09?22:20??編譯原理0

-----------?---------??----------?-----??----

???????????????300382????????????????????10