xref: /original-bsd/old/dbx/tests/mod/imports.mod (revision 27a71f81) 
1*27a71f81Sbosticmodule main;
2*27a71f81Sbosticfrom imptypes import RT;
3*27a71f81Sbosticimport imported;
4*27a71f81Sbostictype
5*27a71f81Sbostic    RT = pointer to record
6*27a71f81Sbostic	i, j : integer;
7*27a71f81Sbostic    end;
8*27a71f81Sbosticvar
9*27a71f81Sbostic    p : imported.T;
10*27a71f81Sbostic    q : imported.OT;
11*27a71f81Sbostic    r : RT;
12*27a71f81Sbosticbegin
13*27a71f81Sbostic    new(r);
14*27a71f81Sbostic    r^.i := 3;
15*27a71f81Sbostic    r^.j := 4;
16*27a71f81Sbostic    imported.Blah;
17*27a71f81Sbosticend main.
18