internal error (unexpected string constant) caused by parse

[renkun-ken]

Open a file with some strings and the parse() used to get the string text could produce error very rarely.

For example, R/document.R contains the following code:

f %in% c("library", "require")

Very rarely, the following error occurs while the file is open for the first time and cannot be reproduced later.

[2020-07-03 10:39:24.692] handling request:  textDocument/documentLink
[2020-07-03 10:39:24.697] internal error: Error: <text>:27:3: unexpected string constant
26: 
27: ry", "
      ^
Call: parse(text = str_expr, keep.source = FALSE)
Stack trace:
1: parse(text = str_expr, keep.source = FALSE)
2: document_link_reply(id, uri, self$workspace, document, rootPath)
3: dispatch(self, id, params)

Not sure why this occurs but a simple fix is to try catch parse() and return nothing if there's an error.