get_test: Get test that is attached to object as "test" attribute

Description Usage Arguments Value Examples

View source: R/gettest.R

Description

The returned function can be executed. If that is done within a testthat::Reporter, the results will be reported accordingly. Without reporter, the test runs silently if successful and stops if it fails.

Usage

1
get_test(object)

Arguments

object

to which the test is attached

Value

the test (function)

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
f <- function(x) x^2

test(f) <- function() {
   context("f")

   test_that("correct result for complex number", {
     expect_equal(f(1i), -1 + 0i)
   })
}

get_test(f)

library(testthat)
## execute the test
get_test(f)()

with_reporter("summary", get_test(f)())

hySpc.testthat documentation built on July 2, 2020, 2:31 a.m.