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