tests/testthat/test_lintr.R

test_that("linting", {
  skip_on_covr()
  lints <- lintr::lint_dir("../../R")
  if (length(lints) != 0) {
    print("")
    print(lints)
    fail("Linting failed")
  } else {
    succeed()
  }
})
AstraZeneca/qscheck documentation built on Nov. 1, 2023, 4:45 a.m.