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