fpc/tests/webtbs/uw14958.pp
2009-11-15 13:50:14 +00:00

21 lines
225 B
ObjectPascal

unit uw14958;
interface
function Fun: Boolean; stdcall;
implementation
function Fun: Boolean; stdcall;
begin
Fun := False;
end;
initialization
Writeln(' ExLib Init');
finalization
Writeln(' ExLib Final');
end.