% Remember to use the lgrind style

\File{block.s},{09:46},{Nov  8 1993}
\L{\LB{\Proc{block}\K{program}_\V{block}_\K{is}}}
\L{\LB{____\K{const}_\V{c}_:_\V{int}_=_3;}}
\L{\LB{____\K{var}_\V{x}_:_\V{int}_:=_4;}}
\L{\LB{____\K{var}_\V{counter}_:_\V{int}_:=_0;}}
\L{\LB{____\K{proc}_\V{block}_()_=}}
\L{\LB{}\Tab{8}{____\K{local}}}
\L{\LB{}\Tab{8}{________\K{var}_\V{y}_:_\V{int}_:=_6}}
\L{\LB{____________\K{in}_}}
\L{\LB{}\Tab{8}{________\V{y}_:=_20_+_\V{x}}}
\L{\LB{____________\K{end}_}}
\L{\LB{\K{in}}}
\L{\LB{____\K{while}_(\V{counter}_\<_500000)}}
\L{\LB{}\Tab{8}{\K{do}}}
\L{\LB{}\Tab{8}{____\K{call}_\V{block}_();}}
\L{\LB{}\Tab{8}{____\V{counter}_:=_\V{counter}_+_1}}
\L{\LB{________\K{end}}}
\L{\LB{\K{end}}}
