Source position: pasresolver.pp line 1603
protected procedure TPasResolver.ScannerWarnDirective(
Sender: TObject;
Identifier: string;
State: TWarnMsgState;
var Handled: Boolean
); virtual;