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

begin
  TMyClass.Create(1);
end.