Return to stkcmds.mod CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / ucb / dbx / tests / mod

Annotation of 43BSDTahoe/ucb/dbx/tests/mod/stkcmds.mod, revision 1.1.1.1

1.1       root        1: module main;
                      2: var
                      3:     i : integer;
                      4: 
                      5: procedure p2 (i : integer);
                      6: begin
                      7:     if i < 5 then
                      8:        p2(i+1);
                      9:     end;
                     10: end p2;
                     11: 
                     12: procedure p1 (i : integer);
                     13: begin
                     14:     p2(i+1);
                     15: end p1;
                     16: 
                     17: begin
                     18:     i := 0;
                     19:     p1(i+1);
                     20: end main.

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.