<unit name="ok_implicit_visibility">
  <structure name="TMyClass" name_with_generic="TMyClass" type="class">
    <ancestor name="TObject" declaration="TObject" />
  </structure>
  <structure name="TMyClassInMState" name_with_generic="TMyClassInMState" type="class">
    <ancestor name="TObject" declaration="TObject" />
  </structure>
</unit>
