tests/testthat/quiet.R

In richfitz/remake: Make-like build management

run_noisy_message <- function() {
  message("make some noise")
  1
}

run_noisy_message2 <- function(x) {
  message("make some more noise")
  1
}

run_noisy_cat <- function() {
  cat("make some noise\n")
  1
}

run_noisy_warning <- function() {
  warning("make some noise")
  1
}

run_noisy_error <- function() {
  stop("make some noise")
  1
}