Return to opaque.mod CVS log

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

Annotation of 43BSD/ucb/dbx/tests/mod/opaque.mod, revision 1.1

1.1     ! root        1: (*
        !             2:  * Test of dealing with an opaque type that is never defined.
        !             3:  *)
        !             4: 
        !             5: module main;
        !             6: 
        !             7: from imptypes import RT;
        !             8: from io import Writef, output;
        !             9: 
        !            10: type
        !            11:     T = record
        !            12:        a : integer;
        !            13:        b : RT;
        !            14:        c : integer;
        !            15:     end;
        !            16: 
        !            17: var r : T;
        !            18: 
        !            19: begin
        !            20:     r.a := 3;
        !            21:     r.c := 4;
        !            22:     Writef(output, "this is a test\n");
        !            23: end main.

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