Source position: pasresolver.pp line 1700
protected procedure TPasResolver.SetCurrentParser(
AValue: TPasParser
); override;