lazytest

<pre class='chroma'> <a href='https://rdrr.io/r/base/library.html'>library</a>(<a href='https://github.com/cynkra/lazytest'>lazytest</a>)</pre>

The goal of lazytest is to save development time by helping you rerun only the tests that have failed during the last run. It integrates tightly with the testthat package and provides the lazytest_local() function, a drop-in replacement for testthat::test_local(), that

memoizes which tests have failed;
runs only those tests in subsequent runs.

If all active tests have succeeded, the entire test suite is run in a second pass.

Usage

Call lazytest_local() instead of testthat::test_local() or devtools::test():

<pre class='chroma'> lazytest::<a href='https://lazytest.cynkra.com/reference/lazytest_local.html'>lazytest_local</a>()</pre>

The package also provides RStudio add-ins that run the tests in a new terminal. Unfortunately, the “Test package” command is hard-wired to devtools::test(), and there seems to be no way to customize it or hook into it.

Example

Let’s create a package with two boilerplate tests.

<pre class='chroma'> withr::<a href='https://withr.r-lib.org/reference/with_options.html'>local_options</a>(usethis.quiet = TRUE) pkg_parent_dir <- withr::<a href='https://withr.r-lib.org/reference/with_tempfile.html'>local_tempdir</a>() pkg_dir <- <a href='https://rdrr.io/r/base/file.path.html'>file.path</a>(pkg_parent_dir, "tea") usethis::<a href='https://usethis.r-lib.org/reference/create_package.html'>create_package</a>(pkg_dir) usethis::<a href='https://usethis.r-lib.org/reference/proj_utils.html'>with_project</a>(path = pkg_dir, { usethis::<a href='https://usethis.r-lib.org/reference/use_testthat.html'>use_testthat</a>() usethis::<a href='https://usethis.r-lib.org/reference/use_r.html'>use_test</a>("blop") usethis::<a href='https://usethis.r-lib.org/reference/use_r.html'>use_test</a>("blip") })</pre>

If we run the tests, they all pass.

Now if we replace one of the tests with a failing test,

<pre class='chroma'> brio::<a href='https://brio.r-lib.org/reference/write_lines.html'>write_lines</a>( text = <a href='https://rdrr.io/r/base/c.html'>c</a>( 'test_that("blop() works", {', 'expect_equal(2 * 2, 42)', '})' ), path = <a href='https://rdrr.io/r/base/file.path.html'>file.path</a>(pkg_dir, "tests", "testthat", "test-blop.R") )</pre>

and then run the tests,

<pre class='chroma'> withr::<a href='https://withr.r-lib.org/reference/with_dir.html'>with_dir</a>( pkg_dir, lazytest::<a href='https://lazytest.cynkra.com/reference/lazytest_local.html'>lazytest_local</a>() ) #> ℹ Testing all tests. #> ✔ | F W S OK | Context #> ⠏ | 0 | blip ✔ | 1 | blip #> ⠏ | 0 | blop ⠋ | 1 0 | blop ✖ | 1 0 | blop [0.2s] #> ──────────────────────────────────────────────────────────────────────────────── #> Failure (test-blop.R:2:1): blop() works #> 2 * 2 (`actual`) not equal to 42 (`expected`). #> #> `actual`: 4 #> `expected`: 42 #> ──────────────────────────────────────────────────────────────────────────────── #> #> ══ Results ═════════════════════════════════════════════════════════════════════ #> Duration: 0.3 s #> #> [ FAIL 1 | WARN 0 | SKIP 0 | PASS 1 ] #> → Testing the following tests next time: #> • blop</s

Lazytest

Install / Use

README

lazytest

Usage

Example