Source position: pastree.pp line 940
public function TPasClassType.HasModifier(
const aModifier: TPastreeString
):Boolean;