fpcsrc/tests/webtbs/tw6822a.pp


1
2
3
4
5
6
7
8
9
10
11
12
13

{ %norun }
library tw6822a;
{$mode objfpc}{$H+}

uses
  popuperr,
  uw6822a;

begin
{$ifndef wince}
  writeln('hello from library');
{$endif wince}
end.