Unit ok_parse_impl

Description

Parse implementation section. Must be tested with –implementation-comments=join –define PASDOC

Name	Description
Class `TClass`
Record `TMyType`

procedure Foo;

procedure Bar;

procedure Laz;

procedure Dex;

procedure NoDescr;

procedure Overloaded; overload;

procedure Overloaded(a: Byte); overload;

Operator :=(C : TMyType) z : TMyType;

procedure Foo;

This is Foo (intf) This is Foo (impl)

procedure Bar;

This is Bar (impl)

procedure Laz;

This is Laz And it must not be doubled

procedure Dex;

This is Dex described inside method body

procedure NoDescr;

This item has no description.

procedure Overloaded; overload;

This is overloaded proc #1

procedure Overloaded(a: Byte); overload;

This is overloaded proc #2

Operator :=(C : TMyType) z : TMyType;

This is assignment operator