blob: 82228d85b4b91be37e52fe0819d879805af541c6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{ %target=win32,win64 }
{ %needlibrary }
unit
ulib2b;
interface
{ Checks that the two functions with the same exported name 'p'
are each loaded correctly. }
procedure p(var a : dword);external 'tlib1a' name 'p';
procedure p2(var a : dword);external 'tlib1a2' name 'p';
implementation
end.
|
