fpc/tests/test/library/tlib1b.pp
pierre 4b17961dd4 * Skip some tests for msdos
git-svn-id: trunk@34266 -
2016-08-10 16:10:25 +00:00

18 lines
204 B
ObjectPascal

{ %target=win32,win64 }
{ %skiptarget=$nosharedlib }
{ %needlibrary }
{ %norun }
{ %neededafter }
library tlib1a2;
procedure p(var a : dword);
begin
a:=2;
end;
exports p;
begin
end.