Return to files.mod CVS log

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

Annotation of 43BSD/ucb/dbx/tests/mod/files.mod, revision 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.