test.pl0

做实习时的一个简单的词法分析器。适合初学的人

program
1   c = +a +b CR
2   a1 = +12*3 CR
3   FOR a = 1 TO 2 CR
4   NEXT a CR
5   UNLOOP a CR
6   IF (a > 12) THEN 8 CR
7   GOTO 8 CR
8   REM "程序结束" CR
9   RETURN CR
10  INPUT A , N CR
11  PRINT B,F,G CR	
12  END CR