freepascal.compiler/tests/webtbf/tw0856.pp

{ %FAIL }
{$MODE objfpc}
uses
  uw0856;

begin
  TMyClass.Create(1);
end.