fpcsrc/tests/webtbs/uw18909a.pp


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

{ %norun }
unit uw18909a;

{$mode objfpc}

interface

type
  TA = record x: Integer; end;
  TB = record x: Integer; end;

implementation

end.