neq.cod

来自「编译原理课程设计」· COD 代码 · 共 37 行

=== COMPILE PL0 ===
  0 PROGRAM EX01; 
  0 VAR A,B; 
  1 BEGIN 
  2   READ(A); 
  4   IF A<>0 
  6   THEN 
  7   B:=-1; 
 12   WRITE(A); 
 15   WRITE(B); 
 18 END. 
  0  JMP   0   1
  1  INI   0   5
  2  OPR   0  16
  3  STO   0   3
  4  LOD   0   3
  5  LIT   0   0
  6  OPR   0   9
  7  JPC   0  12
  8  LIT   0   1
  9  OPR   0   1
 10  STO   0   4
 11  JMP   0  12
 12  LOD   0   3
 13  OPR   0  14
 14  OPR   0  15
 15  LOD   0   4
 16  OPR   0  14
 17  OPR   0  15
 18  OPR   0   0
~~~ RUN PL0 ~~~
? 0
0
1074507845
~~~ END PL0 ~~~