1{ %target=win32,win64,wince,darwin,linux,freebsd,solaris,beos,aix,android,haiku }
2{ %needlibrary }
3{ %norun }
4
5library tw6586a;
6{$H+}{$MODE OBJFPC}
7
8uses cmem;
9
10procedure ExportTest1(input: longint); stdcall;
11begin
12 input:= 5;
13end;
14
15exports
16  ExportTest1;
17
18begin
19end.
20
21