词法分析程序构造原理与实现技术实验报告文档

(c==0)Р {Р fprintf(fp_out,"(%d,%s)",12,TOKEN); //标识符Р printf("(%d,%s)\n",15,TOKEN); //标识符Р }Р elseР {Р fprintf(fp_out,"(%d,%s)",c,TOKEN); //保留字Р printf("(%d,%s)\n",c,TOKEN); //保留字Р }Р }Р elseР if(isdigit(ch)) //是否为数字Р {Р TOKEN[0]=ch;Р ch=fgetc(fp);Р i++;Р while(isdigit(ch))Р {Р TOKEN[i]=ch;Р i++;Р ch=fgetc(fp);Р }Р TOKEN[i]='\0';Р if(ch!=EOF)Р fseek(fp,-1L,1);Р fprintf(fp_out,"(%d,%s)",13,TOKEN); //无符号整数Р printf("(%d,%s)\n",16,TOKEN); //无符号整数Р }Р elseР switch(ch)Р {Р case'<':Р if(!feof(fp))Р ch=fgetc(fp);Р if(ch=='=')Р {Р fprintf(fp_out,"(%d,%s)",24,"<=");Р printf("(%d,%s)\n",24,"<=");Р }Р elseР if(ch=='>')Р {Р fprintf(fp_out,"(%d,%s)",25,"<>");Р printf("(%d,%s)\n",25,"<>");Р }Р elseР {Р if(ch!=EOF)Р fseek(fp,-1,1);Р fprintf(fp_out,"(%d,%c)",23,'<');Р printf("(%d,%c)\n",23,'<');Р }Р break;