Return to bench.p CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / ucb / pascal / tstpx / src

Annotation of 43BSDTahoe/ucb/pascal/tstpx/src/bench.p, revision 1.1.1.1

1.1       root        1: program bench(output);
                      2: var a:alfa;
                      3:     i,j,k: integer;
                      4: begin
                      5:  writeln(wallclock);
                      6:  for i := 1 to 1000 do
                      7:     for j := 1 to 100 do
                      8:        k := 0;
                      9:  writeln(wallclock)
                     10: end.

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