Source position: pastree.pp line 1102
public function TPasProcedure.ElementTypeName: string; override;