Source position: pastree.pp line 1417
public function TPasAnonymousProcedure.TypeName: TPastreeString; override;