freepascal.compiler/tests/webtbf/tw41150.pp

{ %fail }
{$mode delphi}

type

     TSomeClass = class;




     TSomeClass = class;









     TSomeClass = class  // duplicate identifier on this line.
                end;

begin
end.