Source position: pastree.pp line 1298
public function TPasClassConstructor.TypeName: TPastreeString; override;