Source position: pastree.pp line 1316
public function TPasClassDestructor.TypeName: TPastreeString; override;