Source position: pscanner.pp line 926
protected function TPascalScanner.DoFetchDelphiMultiLineTextToken(
QuoteLen: Integer
):TToken;