Source position: pscanner.pp line 866
protected function TPascalScanner.IndexOfDirectiveHandle(
const aDirective: TPasScannerString;
ForInsert: Boolean = False
):Integer;