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