Source position: pastree.pp line 1311
public function TPasDestructor.TypeName: TPastreeString; override;