<unit name="ok_parameter_default_values">
  <routine name="Foo" declaration="procedure Foo(A: Integer; B: Integer = 3; C: Integer = 5);" type="procedure">
  </routine>
  <routine name="Bar" declaration="procedure Bar(A, B: Integer; C: Integer = 3; D: string = '');" type="procedure">
  </routine>
  <routine name="Baz" declaration="function Baz(A: Boolean = True): string;" type="function">
  </routine>
</unit>
