Together with mock can be used to verify whether the
call expression (expect_call) and/or argument values
(expect_args) match the expected.
expect_call(mock_object, n, expected_call)
expect_args(mock_object, n, ...)
expect_called(mock_object, n)A mock object.
Call number or total number of calls.
Expected call expression; will be compared unevaluated.
Arguments as passed in a call.
With expect_called you can check how many times has the mock
object been called.
library(testthat)
# expect call expression (signature)
m <- mock()
with_mock(summary = m, summary(iris))
#> Warning: `with_mock()` was deprecated in testthat 3.3.0.
#> ℹ Please use `with_mocked_bindings()` instead.
# it has been called once
expect_called(m, 1)
# the first (and only) call's arguments matches summary(iris)
expect_call(m, 1, summary(iris))
# expect argument value
m <- mock()
a <- iris
with_mock(summary = m, summary(object = a))
expect_args(m, 1, object = a)
# is an equivalent to ...
expect_equal(mock_args(m)[[1]], list(object = a))