<unit name="ok_record_case_parsing">
  <structure name="TRec1" name_with_generic="TRec1" type="record">
    <variable name="A" declaration="A: Integer" visibility="public">
    </variable>
    <variable name="B" declaration="B: Integer" visibility="public">
    </variable>
  </structure>
  <structure name="TRec2" name_with_generic="TRec2" type="record">
    <variable name="Field1" declaration="Field1: boolean" visibility="published">
    </variable>
    <variable name="A" declaration="A: Integer" visibility="public">
    </variable>
    <variable name="B" declaration="B: Integer;" visibility="public">
    </variable>
  </structure>
  <structure name="TRec3" name_with_generic="TRec3" type="record">
    <variable name="A" declaration="A: Integer;" visibility="public">
      <description><abstract>Descr of A</abstract></description>
    </variable>
    <variable name="B" declaration="B: ShortString;" visibility="public">
      <description><abstract>Descr of B</abstract></description>
    </variable>
    <variable name="C" declaration="C: Integer" visibility="public">
      <description><abstract>Description of C</abstract></description>
    </variable>
    <variable name="D" declaration="D: Integer;" visibility="public">
      <description><abstract>Descr of D, E, F</abstract></description>
    </variable>
    <variable name="E" declaration="E: Integer;" visibility="public">
      <description><abstract>Descr of D, E, F</abstract></description>
    </variable>
    <variable name="F" declaration="F: Integer;" visibility="public">
      <description><abstract>Descr of D, E, F</abstract></description>
    </variable>
    <variable name="G" declaration="G: ShortString;" visibility="public">
    </variable>
    <variable name="H" declaration="H: Integer" visibility="public">
      <description><abstract>Descr of H</abstract></description>
    </variable>
  </structure>
  <structure name="TRec4" name_with_generic="TRec4" type="record">
    <variable name="A" declaration="A: Integer" visibility="public">
    </variable>
    <variable name="B" declaration="B: Integer" visibility="public">
    </variable>
    <variable name="C" declaration="C: Integer" visibility="public">
    </variable>
  </structure>
</unit>
