library(testthat)
library(mfrmr)

is_cran_check <- local({
  env <- Sys.getenv("NOT_CRAN")
  if (identical(env, "")) {
    !interactive()
  } else {
    !isTRUE(as.logical(env))
  }
})

cran_filter <- paste(
  c(
    "anchor-equating",
    "api-coverage-gaps",
    "bubble-chart",
    "bundle-coverage",
    "core-workflow",
    "coverage-push-95",
    "dif-module",
    "draw-coverage",
    "facets-mode-api",
    "output-stability",
    "qc-pipeline",
    "reference-benchmark",
    "remaining-coverage",
    "report-functions",
    "simulation-design"
  ),
  collapse = "|"
)

if (is_cran_check) {
  # Keep CRAN checks under the check-farm time budget by skipping
  # long integration and coverage-expansion suites.
  test_check("mfrmr", filter = cran_filter, invert = TRUE)
} else {
  test_check("mfrmr")
}