testcode2.txt

一个自己制作的词法分析器

const a=abc;
const e=10;
var b,c;
procedure p;
begin
c:=b+a
end;
begin
while b#0 do
begin
write(2*c);
end;
end.