expect_equal() fails for numeric vectors containing Inf values

[andypea]

Calls to expect_equal() fail whenever the values to be compared are numeric vectors with coincident entries having the value Inf. For example, on my machine, the following code:

library(testthat) expect_equal(c(0, Inf), c(1, Inf))

produces the error:

Error in is.character(message) : missing value where TRUE/FALSE needed

This should probably be fixed by handling Inf values explicitly in the function vector_equal_tol(), making the result consistent with a call to vector_equal(). Alternatively, mismatch_numeric() could be altered, so that it handles a diff argument containing entries which are neither TRUE nor FALSE.

expect_equal_inf_bug.txt

[hadley]

Minimal reprex:

library(testthat)
compare(c(0, Inf), c(1, Inf))
#> Error in is.character(message): missing value where TRUE/FALSE needed

^{Created on 2019-04-01 by the reprex package (v0.2.1.9000)}

[hadley]

Even more minimal reprex:

vector_equal_tol(c(0, Inf), c(1, Inf))
#> [1] FALSE    NA