tests/testthat/test_generateS3MethodSignature.R

context("generateS3MethodSignature")

o <- generateS3MethodSignature('opfun', 'zorg', c('x_n', 'z_f'))
test_that("generateS3MethodSignature", {
  expect_length(o, 1L)
  expect_equal(o, "\\method{opfun}{zorg}(x_n, z_f)")
})
neonira/wyz.code.rdoc documentation built on Feb. 19, 2020, 12:47 p.m.