else.cod

来自「语言编译过程采用一趟扫描方式,以语法分析程序为核心,词法分析程序和代码生成程序都」· COD 代码 · 共 49 行

  0 PROGRAM EX01; 
  0 VAR A,B,C; 
  1 BEGIN 
  2   A:=1; 
  4   B:=2; 
  6 IF A>B THEN 
  9   	WRITE(A) 
 12 ELSE 
 14 	WRITE(B); 
 17 IF A<B THEN 
 20   	WRITE(A) 
 23 ELSE 
 25 	WRITE(B); 
 28 END. 
  0  JMP   0   1
  1  INI   0   6
  2  LIT   0   1
  3  STO   0   3
  4  LIT   0   2
  5  STO   0   4
  6  LOD   0   3
  7  LOD   0   4
  8  OPR   0  12
  9  JPC   0  14
 10  LOD   0   3
 11  OPR   0  14
 12  OPR   0  15
 13  JMP   0  17
 14  LOD   0   4
 15  OPR   0  14
 16  OPR   0  15
 17  LOD   0   3
 18  LOD   0   4
 19  OPR   0  10
 20  JPC   0  25
 21  LOD   0   3
 22  OPR   0  14
 23  OPR   0  15
 24  JMP   0  28
 25  LOD   0   4
 26  OPR   0  14
 27  OPR   0  15
 28  OPR   0   0
*** RUN PL0 ***
2
1
*** END PL0 ***