implementation module imported;

type
    OT = integer;
var
    p : OT;

procedure Blah;
begin
    p := 3;
end Blah;

end imported.