R: Mock a sequence of output from a function

mock_output_sequence {testthat}

R Documentation

Mock a sequence of output from a function

Description

Specify multiple return values for mocking

Usage

mock_output_sequence(..., recycle = FALSE)

Arguments

...

<dynamic-dots> Values to return in sequence.

recycle

whether to recycle. If TRUE, once all values have been returned, they will be returned again in sequence.

Value

A function that you can use within local_mocked_bindings() and with_mocked_bindings()

Examples

# inside local_mocked_bindings()
## Not run: 
local_mocked_bindings(readline = mock_output_sequence("3", "This is a note", "n"))

## End(Not run)
# for understanding
mocked_sequence <- mock_output_sequence("3", "This is a note", "n")
mocked_sequence()
mocked_sequence()
mocked_sequence()
try(mocked_sequence())
recycled_mocked_sequence <- mock_output_sequence(
  "3", "This is a note", "n",
  recycle = TRUE
)
recycled_mocked_sequence()
recycled_mocked_sequence()
recycled_mocked_sequence()
recycled_mocked_sequence()