Return to files.mod CVS log

Up to [CSRG BSD Unix] / 43BSDReno / pgrm / dbx / tests / mod

Annotation of 43BSDReno/pgrm/dbx/tests/mod/files.mod, revision 1.1.1.1

1.1       root        1: module main;
                      2: import io;
                      3: 
                      4: var globalf : io.File;
                      5: 
                      6: procedure p (var f : io.File);
                      7: begin
                      8:     f := io.terminal;
                      9:     io.Writef(f, 'this is a test');
                     10:     io.Writef(f, '\n');
                     11: end p;
                     12: 
                     13: begin
                     14:     globalf := io.terminal;
                     15:     p(io.output);
                     16: end main.

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