fpc/tests/tbs0263.pp
1999-10-13 12:57:15 +00:00

16 lines
215 B
ObjectPascal

{ $OPT=-Twin32 }
library tbs0263;
{
The export directive is not necessary anymore in delphi, it's a leftover
from the 16bit model, just like near and far.
}
procedure p;
begin
end;
exports
p name 'p';
end.