Skip to content

Commit

Permalink
Update test-vector-control.R
Browse files Browse the repository at this point in the history
  • Loading branch information
htopazian committed May 21, 2024
1 parent 7a9966b commit f1eb68c
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions tests/testthat/test-vector-control.R
Original file line number Diff line number Diff line change
Expand Up @@ -201,9 +201,11 @@ test_that('indoor_spraying process sets spray_time correctly', {
ms_gamma = matrix(c(-0.009, -0.009), nrow=2, ncol=1)
)
spray_time <- mock_double(rep(0, 4))
renderer <- list(render = mockery::mock())
correlations <- get_correlation_parameters(parameters)
process <- indoor_spraying(
spray_time,
renderer,
parameters,
correlations
)
Expand All @@ -216,6 +218,7 @@ test_that('indoor_spraying process sets spray_time correctly', {
mockery::expect_args(target_mock, 1, seq(4), 'spraying', .9, correlations)
mockery::expect_args(
spray_time$queue_update_mock(),
renderer$render,
1,
50,
c(3, 4)
Expand Down

0 comments on commit f1eb68c

Please sign in to comment.