blob: 4d0886d53a652043ca5ac806df80d5045b895ffa (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
{ Old file: tbs0067.pp }
{ Shows incorrect symbol resolution when using uses in implementation More info can be found in file tbs0067b.pp. }
unit ub0060;
interface
type
tlong=record
a : longint;
end;
procedure p(var t:tlong);
implementation
procedure p(var t:tlong);
begin
end;
end.
|
