Check if the syntax of the code is valid

Source: R/string.R

Try to parse() the code and see if an error occurs.

valid_syntax(code, silent = TRUE)

Arguments

code

A character vector of R source code.

silent

Whether to suppress the error message when the code is not valid.

Value

TRUE if the code could be parsed, otherwise FALSE.

Examples

xfun::valid_syntax("1+1")
#> [1] TRUE
xfun::valid_syntax("1+")
#> [1] FALSE
xfun::valid_syntax(c("if(T){1+1}", "else {2+2}"), silent = FALSE)
#> Error in parse(text = code, keep.source = FALSE) : 
#>   <text>:2:1: unexpected 'else'
#> 1: if(T){1+1}
#> 2: else
#>    ^
#> [1] FALSE