fpc/tests/webtbf/tw10457.pp
2007-12-26 15:21:18 +00:00

18 lines
168 B
ObjectPascal

{ %fail }
{$ifdef fpc}
{$mode delphi}
{$endif}
uses SysUtils, Classes;
Type
Tdatamodule1 = class(Tobject)
rrr: Tobject;
rrr: Tobject;
end;
begin
end.