R Under development (unstable) (2023-08-07 r84900 ucrt) -- "Unsuffered Consequences" Copyright (C) 2023 The R Foundation for Statistical Computing Platform: x86_64-w64-mingw32/x64 R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > # determine if tests should be skipped > is_skip <- !identical(Sys.getenv("NOT_CRAN"), "true") > > # run tests if needed > if (!is_skip) { + ## load packages + library(testthat) + library(prioritizr) + + ## try to load solver packages + suppressWarnings(require(gurobi)) + suppressWarnings(require(lpsymphony)) + suppressWarnings(require(Rsymphony)) + + ## disable parallel testing + Sys.unsetenv("R_TESTS") + + ## determine reporter + if (identical(Sys.getenv("CI"), "true")) { + reporter <- "progress" + } else { + reporter <- testthat::check_reporter() + } + + ## check tests + test_check("prioritizr", reporter = reporter) + } > > proc.time() user system elapsed 0.06 0.09 0.14