编译原理词法分析--A__状态转换图-直接转向法-伪代码描述

int code, value;

strToken := ““;

GetChar(); //将下一字符读入ch中, 搜索指示器前移一个字符位置

GetBC(); //检查ch中的字符是否为空白,若是调用GetChar直至读入非空白字符if (IsLetter())//判断ch中的字符是否为字母

begin

while (IsLetter() or IsDigit())

begin

Concat(); //将ch中的字符连接到strToken之后

GetChar();

End

Retract(); //将搜索指示器回退一个字符位置, 将ch置为空

code = Reserve(); //对strToken中的字符串查找保留字表,若是,返回编码;否则返回0 if (code = 0)

begin

value := InsertId(strToken); //将strToken中的标识符插入符号表,返回指针

return ($ID, value);

end

else

return (code, -);

end

else if (IsDigit())//判断ch中的字符是否为数字

begin

while (IsDigit))

begin

Concat();

GetChar();

End

Retract();

Value := InsertToken(); //将strToken中的标识符插入常数表,返回指针

return ($INT, value);

end

else if (ch = ‘=’)return ($ASSIGN, -);

else if (ch = ‘+’)return ($PLUS, -);

else if (ch = ‘*’)

begin

GetChar();

if (ch = ‘*’) return ($POWER,-);

Retract(); return ($STAR,-);

end

else if (ch = ‘;’)return ($SEMICOLON, -);

else if (ch = ‘(’)return ($LPAR, -);

else if (ch = ‘)’)return ($RPAR, -); else if (ch = ‘{’)return ($LBRACE, -); else if (ch = ‘}’ )return ($RBRACE, -); else ProcError(); //错误处理