R/my_func.R

In aryoda/testthat_base_mocking: A minimal reproducible example to evaluate the testthat behaviour when mocking base functions in a package

# Function under test (returns a named string)
my.func <- function() {
  return(Sys.info()["sysname"])   # e. g. "Linux"
}

my.func.2 <- my.func <- function() {
  return(base::Sys.info()["sysname"])   # e. g. "Linux"
}