tests/testthat/test-args.R

library("testthat")

test_that("Creation of args functions", {
  argsFun <- createArgFunction("createLogger")
  expect_true(any(grepl("#' @param", argsFun)))
  expect_true(any(grepl("createCreateLoggerArgs <- function", argsFun)))
})

Try the ParallelLogger package in your browser

Any scripts or data that you put into this service are public.

ParallelLogger documentation built on Aug. 22, 2023, 5:11 p.m.