Source position: pastree.pp line 1198
public function TPasProcedure.ElementTypeName: TPastreeString; override;