Source position: pscanner.pp line 890
protected function TPascalScanner.HandleDirective(
const ADirectiveText: TPasScannerString
):TToken; virtual;