- Pascal-FC for IBM PC compatibles - 
- GNU Compiler Version P5.2

G L Davies  &  A Burns, University of York

Compiler listing

    1     0 program readln;
    2     0 var val : integer;
    3     0 begin
    4     0    write('I want a value: ');
    5     2    readln(val);
    6     5    writeln('The value was: ',val)
    7     9 end.



Symbol table

    name       link      objekt       type         ref      nrm  lev  adr  aux

 45 _main        44     procedure   notyp           2      True    0    0    0
 46 any           0     variable    synch           0      True    1    5    0
 47 val          46     variable    integer         0      True    1    5    0

Generated P-code

    0     ldcon.i      0        16          ;4
    1     wrstr        0         0          ;4
    2     ldadr        1         5          ;5
    3     rdinp.i      0         0          ;5
    4     rdlin        0         0          ;5
    5     ldcon.i      0        15          ;6
    6     wrstr        0        16          ;6
    7     ldval.i      1         5          ;6
    8     wrval.i      0         0          ;6
    9     wrlin        0         0          ;6
   10     stopx        0         0          ;6
