fa1.tmp

pl0编译器源码

Iput pl/0 file ?y
0 var a,b;

1 begin

2  a:=10;

4  b:=a+++2;

12  a--;

16  a=3---a;