Skip to content

Commit

Permalink
whitespace
Browse files Browse the repository at this point in the history
  • Loading branch information
t-kalinowski committed Nov 4, 2024
1 parent 5afe513 commit c956544
Showing 1 changed file with 2 additions and 7 deletions.
9 changes: 2 additions & 7 deletions tests/testthat/test-method-dispatch.R
Original file line number Diff line number Diff line change
Expand Up @@ -230,14 +230,9 @@ test_that("method dispatch works for class_missing", {
test_that("errors from dispatched methods have reasonable tracebacks", {
my_generic <- new_generic("my_generic", "x")
method(my_generic, class_numeric) <- function(x) tail(sys.calls(), 3)
expect_snapshot({
my_generic(10)
})
expect_snapshot(my_generic(10))

my_generic <- new_generic("my_generic", c("x", "y"))
method(my_generic, list(class_numeric, class_numeric)) <- function(x, y) tail(sys.calls(), 3)

expect_snapshot({
my_generic(3, 4)
})
expect_snapshot(my_generic(3, 4))
})

0 comments on commit c956544

Please sign in to comment.