|
|
1.1 root 1: module main;
2: from imptypes import RT;
3: import imported;
4: type
5: RT = pointer to record
6: i, j : integer;
7: end;
8: var
9: p : imported.T;
10: q : imported.OT;
11: r : RT;
12: begin
13: new(r);
14: r^.i := 3;
15: r^.j := 4;
16: imported.Blah;
17: end main.
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.