词法分析器问题

[Max7Chou]

写了个词法分析器，但是执行时有问题，以下是代码，希望大家看看，找出问题所在并改正，不胜感激。

#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include <math.h>


enum Token_Type // 记号的类别
{ ORIGIN, SCALE, ROT, IS, // 保留字（一字一码）
TO, STEP, DRAW,FOR, FROM, // 保留字
T, // 参数
COMMENT,//注释
SEMICO, L_BRACKET, R_BRACKET, COMMA,// 分隔符
PLUS, MINUS, MUL, DIV, POWER, // 运算符
FUNC, // 函数
CONST_ID, // 常数
NONTOKEN, // 空记号（源程序结束）
ERRTOKEN // 出错记号（非法输入）
};


struct Token // 记号的数据结构
{ Token_Type type; // 类别
char * lexeme; // 属性，原始输入的字符串
double value; // 属性，若记号是常数则是常数的值
double (* FuncPtr)(double); // 属性，若记号是函数则是函数指针
};


static Token TokenTab[] =
{ {CONST_ID, "PI", 3.1415926, NULL},
{CONST_ID, "E", 2.71828, NULL},//常量
{T, "T", 0.0, NULL},//定值变量
{FUNC, "SIN", 0.0, sin},//函数
{FUNC, "COS", 0.0, cos},
{FUNC, "TAN", 0.0, tan},
{FUNC, "LN", 0.0, log},
{FUNC, "EXP", 0.0, exp},
{FUNC, "SQRT", 0.0, sqrt},
{ORIGIN, "ORIGIN", 0.0, NULL},//保留字
{SCALE, "SCALE", 0.0, NULL},
{ROT, "ROT", 0.0, NULL},
{IS, "IS", 0.0, NULL},
{FOR, "FOR", 0.0, NULL},
{FROM, "FROM", 0.0, NULL},
{TO, "TO", 0.0, NULL},
{STEP, "STEP", 0.0, NULL},
{DRAW, "DRAW", 0.0, NULL}
};



FILE *fp;
char str;
char buffer[50]={0};
//int k=0;
struct Token token={ERRTOKEN, "", 0.0, NULL}; // 用于返回记号
void main()
{
if ((fp=fopen("yuan.txt","r"))==NULL)
printf("程序无法打开！\n");
else
{
str =fgetc(fp);
while (str!=EOF)
{
if(isalpha(str)!=0)
{
int i=0;
while(isalpha(str)!=0)
{
buffer[i]=str;
i++;
str=fgetc(fp);
}
buffer[i]='\0';
for(int j=0;j<=17;j++)
{
if(strcmp(buffer,TokenTab[j].lexeme)==0)
printf("%s\t%s\t%s\t%s\t\n",TokenTab[j].type,TokenTab[j].lexeme,TokenTab[j].value,TokenTab[j].FuncPtr);
}
}
else if(isdigit(str)!=0)
{
int i=0;
while(isdigit(str)!=0)
{
buffer[i]=str;
i++;
str=fgetc(fp);
}
buffer[i]='\0';
token.type=CONST_ID;
token.lexeme=buffer;
token.value=(char)buffer;
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
//printf("CONST_ID\t%s\t%s\tNULL\t\n",buffer,buffer);
}
else if(str=='*')
{
str=fgetc(fp);
if(str=='*')
{
token.type=POWER;
token.lexeme="**";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
else
{
token.type=MUL;
token.lexeme="*";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
}
else if(str=='/')
{
str=fgetc(fp);
if(str=='/')
{
int i=0;
token.type=COMMENT;
token.lexeme="//";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
while(str!='\n')
{

str=fgetc(fp);
buffer[i]=str;
i++;
str=fgetc(fp);
}
buffer[i]='\0';
printf("%s",buffer);
}
else
{
token.type=DIV;
token.lexeme="/";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
}
else if(str=='-')
{
str=fgetc(fp);
if(str=='-')
{
int i=0;
token.type=COMMENT;
token.lexeme="--";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
while(str!='\n')
{

str=fgetc(fp);
buffer[i]=str;
i++;
str=fgetc(fp);
}
buffer[i]='\0';
printf("%s",buffer);
}
else
{
token.type=MINUS;
token.lexeme="-";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
}
else if(str=='+')
{
token.type=PLUS;
token.lexeme="+";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
else if(str=='(')
{
token.type=L_BRACKET;
token.lexeme="(";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
else if(str==')')
{
token.type=R_BRACKET;
token.lexeme=")";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
else if(str==',')
{
token.type=COMMA;
token.lexeme=",";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
else if(str==';')
{
token.type=SEMICO;
token.lexeme=";";
printf("%s\t%s\t%s\t%s\t\n",token.type,token.lexeme,token.value,token.FuncPtr);
}
else if(str=' '||str=='\t')
{str=fgetc(fp);
}
}
}
}