<unit name="ok_strict_visibilities.pas">
  <structure name="TStrictVisibility" name_with_generic="TStrictVisibility" type="class">
    <ancestor name="TObject" declaration="TObject" />
    <variable name="StrictPrivateInteger: integer;">
      <description><detailed>the visibility of <code>StrictPrivateInteger</code> is &quot;strict private.&quot;</detailed></description>
    </variable>
    <variable name="StrictProtectedInteger: integer;">
      <description><detailed>the visibility of <code>StrictProtectedInteger</code> is &quot;strict protected.&quot;</detailed></description>
    </variable>
  </structure>
</unit>
